Встолбик все натуральные числа из диапазона от a до b в обратном порядке. входные данные: во входном потоке заданы два целых числа a и b (0 < a < 100, a < b < = 100)

Program obr;

Uses Crt;

var a,b,i:byte;

begin

     clrscr;

     write('Введите а:');

     readln(a);    

     write('Введите b:');

     readln(b);

     for i:=b downto a do 

            writeln(i:2);

     readkey;  

 end.