Написать рекурсивную процедуру для ввода с клавиатуры последовательности чисел и вывода ее на экран в обратном порядке(окончание последовательности-при вводе нуля).Паскаль

Предыдущий
вопрос Следующий
вопрос

Пример рекурсивной процедуры на Pascal:

program RecursiveInputOutput;
var
number: Integer;
procedure RecursiveOutput;
begin
readln(number);
if number <> 0 then
begin
RecursiveOutput;
writeln(number);
end;
end;
begin
writeln('Введите последовательность чисел (для завершения введите 0):');
RecursiveOutput;
end.

При выполнении данной программы пользователю будет предложено ввести последовательность чисел с клавиатуры. После ввода нуля, программа начнет рекурсивно выводить числа в обратном порядке.