type time = record (тип запись) Опции

[mitz]

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

Дано время, описанное следующим образом:
type time = record
h:0..23;
m,s: 0..59
end;
Описать логическую функцию erlier(t1,t2) для проверки, предшествует ли время t1 времени t2 (в рамках суток) и проиллюстрировать её работу в программе.