1) вычислить и вывести на экран значение функции y=cos x, где x изменяется от 0 до 1 с шагом 0,2.

vladpin01 vladpin01    1   01.07.2019 07:30    3

Ответы
masha3500 masha3500  02.10.2020 17:12
Паскаль.

Program pr;
uses crt;

Var x,y:real;

Begin
x:=0;  

While x<=1 do
Begin
y:=cos(x);
Writeln('x=', x:6:2,  '  y=',  y:6:2);
x:=x+0.2;
end;
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика