
Sinomunap
6 год назад
СРОЧНО !!!!!!!
Дано натуральное число n вычислить S = 1/(3^2)+1/(5^2)+1/(7^2)+1/((2n+1)^2) РЕШИТЕ ЧЕРЕЗ For ПОЖАЛУЙСТА (^2- степень ; 1/(3^2)- дробь) НА ФОТО 17 НОМЕР Pascal

ОТВЕТЫ

Руслан
Aug 3, 2019
Var
s: real;
i, n, t: integer;
begin
readln(n);
for i := 1 to n do
begin
t := 2 * i + 1;
s := s + 1 / (t * t);
end;
writeln(s);
end.
s: real;
i, n, t: integer;
begin
readln(n);
for i := 1 to n do
begin
t := 2 * i + 1;
s := s + 1 / (t * t);
end;
writeln(s);
end.
207
Смежные вопросы: