Регистрация
Войти
Стать экспертом Правила
Информатика

СРОЧНО !!!!!!!
Дано натуральное число 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.
207
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам