В Pascal ABC

Вывести на экран последо вательность символов: 122333444455555 ...

Question

Настася

1 декабря, 19:20

+5

Ответы (1)

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

Майа · Answer 1

Var

I, p: byte;

begin

for i:=1 to 5 do

begin

for p:=1 to I do

begin

write (i) ;

end;

end;

end.

В Pascal ABCВывести на экран последо вательность символов: 122333444455555 ...