5.27 найти сумму всех целых чисел от 100 до 500 ( паскаль ) 5.28 найти произведение всех целых чисел от 8 до 15 ( тоже паскаль ) 5.29 найти среднее арифметическое всех целых чисел от 1 до 1000;

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(Range(100,500).Sum);
  Writeln(Range(8,15).Aggregate(1,(m,n)->m*n));
  Writeln(Range(1,1000).Average)
end.

Результат
120300
259459200
500.5

Соответственно 1, 2 и 3 задания