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.Результат120300259459200500.5