Регистрация
Войти
Стать экспертом Правила
Информатика

С помощью операторов цикла вывести на экран
55555
4444
333
22
1

ОТВЕТЫ
Var i,j:integer;
begin
for i:=5 downto 1 do
 begin
 for j:=1 to i do write(i);
 writeln;
 end;
end.

Результат:
55555
4444
333
22
1
289
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам