Вывести сумму двузначных чисел до 30

Вывести сумму двузначных чисел до 30
Гость
Ответ(ы) на вопрос:
Гость
Program n1; var i,p: integer; begin p:=0; for i:=10 to 30 do p:=p+i; writeln(p); end.
Гость
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017 // Внимание! Если программа не работает, обновите версию! begin   Writeln(Range(10,30).Sum) end. Результат 420
Не нашли ответ?
Ответить на вопрос
Похожие вопросы