PASCAL ABC. Написать числа от 30 до 10 в столбик, заранее спасибо ;)
Program n1; var i: integer; begin for i:=30 downto 10 do writeln(i); end.