Boston Dynamics решили выпустить робота-почтальона, его задача доставить посылку к дому, отчитаться о доставке и поехать к следующему. Повезло, что все заказчики живут на одной улице и дома нумеруются по порядку Вам даны два целых числа A и В, номер первого дома и номер последнего, который посетил почтальон ему составить отчет для Boston Dynamics и выведите номера всех домов от A до B включительно. И да, этот почтальон - инновационное изобретение, которые не знает циклов, так что вам придется использовать рекурсию.

Формат входных данных
На вход ваша программа получает два целых числа (1 ≤ a ≤ b ≤ 100).

Формат выходных данных
Выведите все числа от A до B

входные данные
3
6

1
10
выходные данные
3
4
5
6

1
2
3
4
5
6
7
8
9
10

var
    A: array [1..10] of integer;
    i, j, n, temp: integer;

begin
    randomize();
    n := 10;
    for i := 1 to n do
    begin
        A[i] := random(100);
        write(A[i], ' ');
    end;
    
    for j := 1 to n - 1 do
    begin
        for i := 1 to n - j do
        begin
            if a[i] mod 10 < a[i + 1] mod 10 then begin
                temp := a[i];
                a[i] := a[i + 1];
                a[i + 1] := temp;
            end;
        end;
    end;
    
    writeln();
    for i := 1 to n do
        write(A[i], ' ');
end.

const

  n = 10;

var

  a:array[1..n] of integer;

  i, j:integer;

begin

  randomize;

  writeln('Исходный массив:');

  for i := 1 to n do

  begin

    a[i] := random(101);

    write(a[i], ' ');

  end;

  for i := 1 to n - 1 do

    for j := 1 to n - i do

      if a[j] mod 10 > a[j + 1] mod 10 then

      begin

        a[j] := a[j] + a[j + 1];

        a[j + 1] := a[j] - a[j + 1];

        a[j] := a[j] - a[j + 1];

      end;

  writeln;

  writeln('Результат:');

  for i := 1 to n do

    write(a[i], ' ');

  writeln;

end.