41

Помогите пожалуйста с этим заданием: Составьте программу…

dunkan 26 февраля 2023

Помогите пожалуйста с этим заданием: Составьте программу для вычисления следующей суммы: S=1+(i1+1) / i1+… +(in+1) / in, где i меняется от 5 до 20.

категория: информатика

85

var S: real; n, i: integer; begin s: =1; write ('Введите количество членов последовательноти '); readln (n); for i: =1 to n do S: =S+(i+1) / i; writeln ('S=', S); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...