Составить таблицу значений функции y = sin(x/2) на отрезке [0; 20] с шагом 1.
Ответ:
// PascalABC.NET
var
y,x,n:real;
begin
write('Введите n: ');
readln(n);
while (x <= n) do begin</p>
writeln('Y = ', sin(x/2));
x:=x+0.20;
end;
end.