Найти среднее арифметическое всех натуральных чисел от 1 до 100 (паскаль)

Dhffhjh Dhffhjh    3   25.09.2019 12:50    0

Ответы
ragmova ragmova  08.10.2020 18:26
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  1.To(100).Average.Println
end.
ПОКАЗАТЬ ОТВЕТЫ
милана200229 милана200229  08.10.2020 18:26
// PascalABC.NET 
// Версия 3.3.5 сборка 1662 (29.04.2018)

begin 
  Range(1, 100).Average.Println
end.
Найти среднее арифметическое всех натуральных чисел от 1 до 100 (паскаль)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика