30 ! 14 , ! нужно написать в pascal abc программу для нахождения значений функции

viktoria168 viktoria168    3   17.09.2019 11:26    0

Ответы
Птичка04 Птичка04  07.10.2020 21:40

program fantscrin;

var x,y: real;

begin

 x:= 0;

 while x <= 2 * 3.14 do

 begin

   y:=sin(x) + 2/cos(x);

   x:=x + 0.1;

   writeln('x = ', x,' y = ', y);

 end;

end.

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