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

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

в избранное

lexxxx1808

25 июля 2022

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.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

1) техническое средство, с помощью которого происходит передача информации

Несколько ложек стоят 200 рублей а то же количество вилок 176 рублей сколько стоят 5 ложек если каждая дешевле 50 рублей

Найти максимальный элемент и его номер. В Pascal. Тема массивы

Найдите x: 1) 16x бит=128 Кбайта 2) 8x бит=32 Кбайта

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать произвольные целые значения

Составить программу, которая в последовательности целых чисел находит сумму чисел кратных 7 в диапозоне…

В строке "if (a+b+c) mod 7 then" после 7 выдает ошибку: ожидалось логическое выражние, помогитеисправить

. Система команд исполнителя Вычислитель состоит из двух команд: 1 – прибавить 2 2 – умножить…

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: