Вывести ** экран все нечетные числа от 100 до 400. Посчитать сумму и среднее...

+790 голосов
6.1m просмотров

Вывести на экран все нечетные числа от 100 до 400. Посчитать сумму и среднее арифметическое всех четных чисел от 100 до 300.


Информатика | 6.1m просмотров
Дан 1 ответ
+104 голосов

Ответ:

  • begin;
  • Arr(100..400)[1::2].Println;
  • var a:= Arr(100..300)[::2];
  • Println('Сумма  :',a.Sum);
  • Println('Среднее:',a.Average);
  • end.

Пример работы:


image
(3.7k баллов)