Помогите !!!
Написать рекурсивную процедуру вывода на экран всех чисел от n1 до к1. И вторую в обратном порядке.

procedure print_forward(start, finish: integer);
begin
  write(start:4);
  if start <> finish then
    print_forward(start + 1, finish);
end;

procedure print_back(start, finish: integer);
begin
  if start <> finish then
    print_back(start + 1, finish);
  write(start:4);
end;

volvo, спасибо огромное!!