Вычислите сумму всех двузначных чисел, используя циклический оператор

Question

Информатика

Марат

8 декабря, 01:40

Вычислите сумму всех двузначных чисел, используя циклический оператор

+4

Ответы (1)

Знаете ответ?

Агриппа · Answer 1

Var i, s:integer;

begin

for i:=10 to 99 do

s:=s+i;

writeln (s) ;

end.

ну или

var i, s:integer;

begin

i:=10;

while i<100 do begin

s:=s+i;

i:=i+1;

end;

writeln (s) ;

end.