Question

напишите плез программу)
sin(x)+sin(x^2)+...+sin(x^n)
x=5
n=20

Answer 1

var x,xn,s:real; i,n:integer;
begin
x:=5; n:=20;
s:=0;
xn:=1;
for i:=1 to n do
 begin
 xn:=x*xn;
 s:=s+sin(xn);
 end;
writeln('s = ',s:5:3);
end.

Результат:
s = -3.826

Answer 2

спасибо