Регистрация
vikaisaenko1511
05.04.2020 09:53
Информатика
Есть ответ 👍

Выберите последовательность действий

163
385
Посмотреть ответы 1

Ответы на вопрос:

Anchoys777
Anchoys777
4,7(52 оценок)
Uses crt; var n,i: integer;     x,s: real;     function pow(x: real; n: integer): real; var r: real;     i: integer; begin   r: =x;   for i: =1 to n-1 do   r: =r*x;   pow: =r; end;     begin   clrscr;   write('n: ');   readln(n);   write('x: ');   readln(x);   for i: =1 to n do   s: =s+pow(sin(x),i);   writeln('answer: ',s: 5: 4);   readln; end.

Популярно: Информатика