Задать вопрос
19 марта, 07:50

Как выполнить данную операцию на паскале? вычислить (1 + (1 / (1^2))) * (1 + (1 / (2^2))) * (1 + (1 / (3^2))) ... * (1 + (1 / (n^2)))

если кому легче то вот как оно же выглядит на паскале (1 + (1 / (1*1))) * (1 + (1 / (2*2))) * (1 + (1 / (3*3))) ... * (1 + (1 / (n*n)))

+4
Ответы (1)
  1. 19 марта, 08:27
    0
    Var

    n, i : integer;

    resault : real;

    Begin

    write ('n = ') ; readln (n) ;

    resault : = 1;

    for i: = 1 to n do

    resault * = 1 + (1 / sqr (i)) ;

    Writeln ('Результат: ', resault)

    End.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Как выполнить данную операцию на паскале? вычислить (1 + (1 / (1^2))) * (1 + (1 / (2^2))) * (1 + (1 / (3^2))) ... * (1 + (1 / (n^2))) если ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы