Найти сумму ряда - Free Pascal (792)

Узнай цену своей работы

Формулировка задачи:

Даны целые числа а1,а2,...,а20.найти сумму а2+а4+а6+... .

Решение задачи: «Найти сумму ряда»

textual
Листинг программы
s:=0;
for i:=1 to 10 do
s:=s+a[i*2];

Объяснение кода листинга программы

  1. Объявляется переменная s типа дробное число и инициализируется значением 0.
  2. Задается диапазон для цикла for от 1 до 10.
  3. Внутри цикла значение переменной s увеличивается на значение элемента массива a с индексом i*2.
  4. После завершения цикла значение переменной s будет содержать сумму элементов массива a с индексами 2, 4, 6, 8, 10, 12, 14, 16, 18 и 20.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4.6 из 5