Найти среднее арифметическое целых чисел от 15 до 22

Question

Найти среднее арифметическое целых чисел от 15 до 22

Answer 1

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
  Writeln(Range(15,22).Average)
end.

Результат
18.5