Составит программу которая выводит на экран числа от 1 до 30 в порядке убывания
Var i:integer;
begin
for i:=30 downto 1 do write(i, )
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var i:integer;
begin
for i:=30 downto 1 do write(i, )
end.