Enoncé

Les coureurs appartiennent à un équipe représentée un caractère ('A','B','C'). A chaque coureur est associé le temps
en minutes et secondes mis pour parcourir l'étape. Une équipe comporte 3 coureurs.

Définir le type Coureur dont les valeurs représentent les coureurs.

Solution

type Coureur is
     record
       dossard: Positive;
       equipe: Character  range 'A'..'C';
       minutes: Positive;
      secondes: Integer range 0..59;
     end;