Koe,

Il manque un end; pour fermer le case of dans la fonction précédente.


function estUnMoisA31Jours(mois : Integer) : Boolean;
begin
case mois of
1,3,5,7,8,10,12 :...