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

спасибо

var x,xn,s:real; i,n:integer;beginx:=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