ПРОВЕРЬТЕ РЕШЕНИЕДан набор из N целых положительных чисел. Из них необходимо

ПРОВЕРЬТЕ РЕШЕНИЕ

Дан набор из N целых положительных чисел. Из их нужно избрать и вывести
два числа так, чтобы их сумма была нечётна, а творение делилось на 3 и
при этом было очень возможным. Избранные числа можно выводить
в любом порядке. Если есть несколько подходящих пар, можно избрать всякую
из них. Если подходящих пар нет, необходимо вывести 0.
Напишите эффективную по медли и по памяти программу для решения этой
задачки.
Программка считается эффективной по времени, если при увеличении
количества начальных чисел N в k раз время работы программки увеличивается
не более чем в k раз.
Программа считается действенной по памяти, если память, нужная для
хранения всех переменных программки, не превосходит 1 килобайта и не
увеличивается с ростом N.
Описание входных и выходных данных
В первой строке входных данных задаётся количество чисел N (1 N 1000).
В каждой из следующих N строк записано одно естественное число, не
превышающее 100.

Пример входных данных:
5
1
2
3
4
5
Пример выходных данных для приведённого выше образца входных данных:
3 4

Объясненье. Из 5 чисел можно составить 10 пар. В данном случае условиям
удовлетворяют две пары: (2, 3) и (3, 4). Суммы чисел в этих парах (5 и 7)
нечётны, а творенья (6 и 12) делятся на 3. У всех других пар как
минимум одно из этих условий не производится. Из 2-ух возможных пар
выводим ту, в которой больше творение частей.

Решение
Находим наибольшие чётные и нечётные числа посреди всех и отдельно посреди
кратных 3, вычисляем подходящие произведения, выбираем из их
наибольшее.

алг Задачка
нач
цел x0, x1, y0, y1
ввод n
x0 := 0; x1 := 0
y0 := 0; y1 := 0
нц n раз
ввод a
если mod(a,3)= 0 и mod(a,2) = 0 и a gt; x0:
то x0 :=a
все
если mod(a,3)= 0 и mod(a,2) = 1 и a gt; x1:
то x1 :=a
все
если mod(a,2) = 0 и a gt; y0:
то y0 :=a
все
если mod(a,2) = 1 и a gt; y1:
то y1 :=a
все
кц
если x0*y1 = 0 и x1*y0 = 0
то вывод 0
по другому
если x0*y1 gt; x1*y0
то вывод x0, ' ', y1
по другому вывод x1, ' ', y0
все
все
кон

Укажите оплошности в программке, если такие есть. Спасибо