Créer des types intervalles heure_t, minute_t et seconde_t, puis un type

enregistrement temps_t.



Voici le code:

TYPE

heure_t = 0..23;

minute_t = 0..59;

seconde_t = 0..59;

temps_t = Record

h : heure_t;

m : minute_t;

s : seconde_t;

End;