Составить программу. pascal. Вывести на экран натуральные числа от c до d (c>d)
var c,a,d:integer;
begin
write('c= ');
read (c);
write('d= ');
read (d);
writeln();
for a:=c to d do
write(a,' ');
end;
end.