Вычислить значения функции y=sin x на отрезке [-10,10] с шагом 2

annswi annswi    3   26.05.2019 22:20    0

Ответы
Erantpay22 Erantpay22  23.06.2020 16:20

program raf105;

var

 x: integer;

 y: real;

begin

 x:= -10;

 while x <= 10 do

 begin

   y:= sin(x);

   writeln('(',x:3,' ; ',y:3:2,')');

   x:= x+2;

 end;

end.

PascalABC 3.4.2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика