Дано число n. Составить программу нахождения ряда чисел 1+1/4+1/9+1/16+...+1/n в квадрате.
Дано число n. Составить программу нахождения ряда чисел 1+1/4+1/9+1/16+...+1/n в квадрате.
Гость
Ответ(ы) на вопрос:
Гостьvar n,i:integer;
s:real;
begin
writeln('n=');
readln(n);
s:=0;
for i :=1 to n do
s:=s+1/sqr(i);
writeln('s=',s);
readln;
end.
Не нашли ответ?
Похожие вопросы