Помогите PASCAL ОЧЕНЬ СРОЧНО)))
S=sinx+sin2x+sin3x+...+sin7x

Задачка на циклы. varx,i:integer;s:real;begin   write('vvedite x: ');   readln(x);   for i:=1 to 7 do s:=s+sin(i*x);   writeln('s=', s);end.что тут сложного?