Question

Составить программу вывода на экран натуральных чисел от 30 до 20 в строку через пробел

Answer 1

program m;
var n:integer;
begin
for n:=30 downto 20 do
write(n,' ');
end.