Question

Вывести на экран таблицу значений функции y=e^sin(x)cos(x) на отрезке [0;П/2] с шагом 0.1.
ПОМОГИТЕ ПОЖАЛУЙСТА
СО СИНТАКСИСОМ WHILE

Answer 1

Ответ:

var

 x:= 0.0;

 y: real;

 step:= 0.1;

begin

 while x<=(Pi/2) do

 begin

   y:=Exp(Sin(x))*Cos(x);

   writeln('y = ',y:0:2,' x= ',x);

   x:=x+step;

 end;

end.

Объяснение: