Используя тип запись и массив type data=record day: integer; mounth: integer; year: integer; end; var a: array[1..100] of data; ввести n дат в формате дд.мм.. определить самую позднюю дату.

Программа и пример её работы - в прилагаемом файле. (Контроля правильности ввода данных нет.)