составить программу вычисления суммы натуральных чисел от 20 до 50

Ответы

Ответ дал: George2410
0
uses crt;
var sum, i : integer;
Begin
sum := 0;
for i := 20 to 50 do
sum := sum + i;
writeln(sum);
End.
Похожие вопросы