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

для Паскаля.

Question

Настуля

11 февраля, 09:50

+2

Ответы (1)

Знаете ответ на вопрос?

Микита · Answer 1

Program sum;

Var i, k:integer;

Begin

k:=0;

for i:=10 to 99 do

k:=k+i;

writeln ('Summa=', k) ;

End.

Составьте программу вычисления суммы всех двузначных чисел.для Паскаля.