Найти среднее арифметическое чётных элементов массива - Pascal ABC

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

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

Дан одномерный массив, который содержит не более 10 целых чисел. Найти среднее арифметическое четных элементов Можете помочь пожалуйста

Решение задачи: «Найти среднее арифметическое чётных элементов массива»

textual
Листинг программы
 if k=0 then write('Нет чётных элементов') else write('Результат ',avg/k);

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

  1. Переменная k равна 0, поэтому выводится сообщение Нет чётных элементов.
    1. Переменная k не равна 0, поэтому выводится результат в виде среднего арифметического чётных элементов массива, делённого на значение переменной k.

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


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

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

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