Найти сумму всех целых числа из промежутка от 300 до 600
Найти сумму всех целых числа из промежутка от 300 до 600
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
Writeln('s=',Range(300,600).Sum)
end.
Результат:
s=135450
Не нашли ответ?
Похожие вопросы