Задачи на Delphi

Кот Матроскин и Шарик загадывали четные и нечетные числа в произвольном порядке, пока не кончилось место на печке, где они записывали эти числа. Определить, каких чисел было загадано больше: четных или нечетных, если последним было записано число 0 (0 при подсчете не учитывать!). Сколько четных чисел предшествовало первому нечетному?
Вот первая
И
Сформировать файл "TEST"содержащий информацию о выполнении N заданий M студентами.Для каждого студента вводится фамилия,далее -для каждого задания выполнено или нет.Выдать сведения о студентах ,выполнивших более заданного количества заданий.Названия хранить в первом компоненте файла