помогите пожалуйста....Вывести в столбик все натуральные числа из диапазона от a до b в...

0 голосов
52 просмотров

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


Информатика (12 баллов) | 52 просмотров
Дан 1 ответ
0 голосов

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.

 

 

 

 

 

 

 

 

 

 

(2.4k баллов)