Question

Составить таблицу значений функции y = sin(x/2) на отрезке [0; 20] с шагом 1.

Answer 1

Ответ:

// PascalABC.NET

var

y,x,n:real;

begin

write('Введите n: ');

readln(n);

while (x <= n) do begin

writeln('Y = ', sin(x/2));

x:=x+0.20;

end;

end.