Найти сумму элементов массива, значения которых не превышают число 100 и больше числа 20 - Free Pascal

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

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

Вводится массив. Найти сумму элементов,значение которых не привышают число 100 и больше числа 20

Решение задачи: «Найти сумму элементов массива, значения которых не превышают число 100 и больше числа 20»

textual
Листинг программы 
sum:=0;
for i:=1 to n do
if a[i] in [21..100] then sum:=sum+a[i];

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

  1. В начале программы объявлена переменная sum и инициализирована значением 0.
  2. Затем происходит цикл по массиву a от элемента с индексом 1 до последнего элемента n.
  3. Внутри цикла проверяется условие, если значение элемента a[i] находится в диапазоне от 21 до 100 (включительно), то прибавляется к переменной sum.
  4. По завершению цикла, значение переменной sum будет содержать сумму элементов массива, удовлетворяющих условию.

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

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

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

6   голосов , оценка 4 из 5
Похожие ответы