СРОЧНО !!!!!!!Дано натуральное число n вычислить S=1/(3^2)+1/(5^2)+1/(7^2)+1/((2n+1)^2) РЕШИТЕ ЧЕРЕЗ For ПОЖАЛУЙСТА (^2- степень ; 1/(3^2)- дробь) НА ФОТО 17 НОМЕР Pascal
СРОЧНО !!!!!!!
Дано натуральное число n вычислить S=1/(3^2)+1/(5^2)+1/(7^2)+1/((2n+1)^2) РЕШИТЕ ЧЕРЕЗ For ПОЖАЛУЙСТА (^2- степень ; 1/(3^2)- дробь) НА ФОТО 17 НОМЕР Pascal
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы