Найти значение всех двухзначных чисел от 10 до 99

Программирование. Информатика.

Question

Маугуд

25 апреля, 13:05

+4

Ответы (1)

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

Филик · Answer 1

Program p1;

var i, n, a:integer;

begin

n:=99;

a:=10;

for i : =10 to n do

begin

a:=a+i;

end;

writeln (a);

readln;

end.

Найти значение всех двухзначных чисел от 10 до 99Программирование. Информатика.