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

Question

Информатика

Акила

19 ноября, 10:19

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

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