• Предмет: Информатика
  • Автор: Блицкранк
  • Вопрос задан 8 лет назад

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

Приложения:

Ответы

Ответ дал: Aillianna
0
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.
Похожие вопросы