Travaux Dirigés : Algorithmique et Structure de Données 1
PROGRAM nb_sec;. TYPE. { cf 1) }. VAR t : temps_t; ns : integer;. BEGIN write ('Temps (h m s) : '); readln (t.h, t.m, t.s);. { calcule le nb de sec depuis 0:0:0 }.
PROGRAM nb_sec;. TYPE. { cf 1) }. VAR t : temps_t; ns : integer;. BEGIN write ('Temps (h m s) : '); readln (t.h, t.m, t.s);. { calcule le nb de sec depuis 0:0:0 }.