
Макар
5 год назад
Составьте программу, которая вычисляет сумму тридцати первых натуральных чисел и выводит на экран результат.
ОТВЕТЫ

Krstina
Oct 24, 2020
Два способа в одном операторе))
begin
Writeln(Range(1,30).Sum,' ',(1+30)*30 div 2)
end.
465 465
begin
Writeln(Range(1,30).Sum,' ',(1+30)*30 div 2)
end.
465 465
856
Смежные вопросы: