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

для Паскаля.

Question

Спиридон

21 июня, 08:32

+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.

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