Enoncé:
Écrire un programme Pascal qui lit une durée T en secondes et la traduit en heures, minutes et secondes puis affiche le résultat.

Exemple : T = 5000 s ===> 1 : h 23 : mn 20 : s


Réponse :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Program ConversionHeure;
uses wincrt; 
var H, S, M : integer
 
Begin 
Repeat 
write ('donner le nombre de scondes :');
readln (sec);
until (sec > 0)
 
H := sec DIV 3600
HR := sec MOD 3600
M := HR DIV 60
S := HR MOD 60
 
write ('le résultat est :', H h, M mn, S s)
 
end.
=======> je voulais juste savoir si c'est correct ou pas?????? merci!!!!!!
j'ai pas utilisé des constantes, j'ai juste utilisé les variables.