Найти сумму ряда - Free Pascal (792)
Формулировка задачи:
Даны целые числа а1,а2,...,а20.найти сумму а2+а4+а6+... .
Решение задачи: «Найти сумму ряда»
textual
Листинг программы
s:=0; for i:=1 to 10 do s:=s+a[i*2];
Объяснение кода листинга программы
- Объявляется переменная
s
типа дробное число и инициализируется значением 0. - Задается диапазон для цикла
for
от 1 до 10. - Внутри цикла значение переменной
s
увеличивается на значение элемента массиваa
с индексом i*2. - После завершения цикла значение переменной
s
будет содержать сумму элементов массиваa
с индексами 2, 4, 6, 8, 10, 12, 14, 16, 18 и 20.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д