Рекурсивная и итеративная подпрограммы

[Иван_Владимирович]

Задали решить задачку по программированию:

>>Условие<<

Разработать алгоритм и составить программу для решения задачи двумя способами: используя рекурсивную и итеративную подпрограммы.

>>Условие задачи<<

Дана последовательность неотрицательных целых чисел. Вывести сначала все чётные, а затем все нечётные числа. Последовательность заканчивается нулём.
Спасибо за помощь.

[Stilet]

Не сложно. Покажешь ввод последовательности?

[Иван_Владимирович]

uses crt;
procedure vvod;
var a: integer;
begin
clrscr;
writeln('Введите целые числа, окончание ввода 0');
readln(a);
if a <> 0 then
 begin
  vvod;
  writeln(a);
 end;
end;

процедура ввода. Это?...
Скорее всего не это, так как я в программировании полный ноль!((((
Простите, это, то что я написал, полный бред!!! Не обращайте на это внимания!

[Stilet]

Хм... Ты еще сильнее усложнил...
Что в твоем понимании "последовательность"? Что вам давали на том уроке?

[Arigato]

Я так понял, надо без массивов, списков и прочего. Тогда задача не такая уж и простая.

[Иван_Владимирович]

Короче, я так понял нужно вводить последовательность неотрицательных чисел окончание которой ноль. после этого программа должна сначала вывести все чётные числа, потом нечётные. но всё это усложняет постусловие задачи: Выполнить это с помощью рекурсивной и итеративной подпрограммы.... так как я в программировании полный ноль, вся надежда на Вас!!!! Спасибо!)

[Stilet]

но всё это усложняет постусловие задачи

Задачу усложняет не это. Выше был приведен пример, который не запоминает введенное ранее, что делает как рекурсию так и итерации практически невозможной.
Короче говоря спрошу в лоб: Массив, список или что-то хранящее в себе введенные данные целиком допустимо, или запрещено?