Написать программу для решения циклической k=(sin(1+1)*sin(1+2)*sin(1+3)*sin(1+*sin(1++n), .

vladislava240203444 vladislava240203444    3   29.05.2019 11:16    2

Ответы
Bomberidze Bomberidze  28.06.2020 16:55

program raf105;

var

 i,n: integer;

 k: real;

begin

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

 readln(n);

 k:=1;

 for i:=1 to n do

   k:= k * sin(1+i);

 writeln('k = ',k);

end.

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