Вычислите значение функции

@Strife · Регистрация: 15.10.2019

Вычислите значение функции y=cos(x)*tg(pi*x) на интервале [0; pi), где шаг изменения равен 0.1.

@Puporev · 15.10.2019, 18:00

Pascal

var x:real;
begin
x:=0;
while x<=pi do
 begin
  writeln('x=',x:4:1,'  y=',cos(x)*sin(pi*x)/cos(pi*x):6:3);
  x:=x+0.1;
 end;
end.

@Strife 0 / 0 / 0 Регистрация: 15.10.2019 Сообщений: 11
		1
	Вычислите значение функции 15.10.2019, 17:32. Показов 3758. Ответов 1 Метки нет (Все метки) Вычислите значение функции y=cos(x)tg(pix) на интервале [0; pi), где шаг изменения равен 0.1. 0

Опции темы

Решение