Question

Решить в Pascal
S=sinx+sin2x+sin3x+...+sin7x

Answer 1

s:=0;
for i:=1 to 7 do begin
s:=s+sin(x);
x:=x+x;
end;
Остальную программу сам допишешь.