479 B
479 B
Ex 2.11
Lexique : EntreeSecondes : réel TempsMinutes : réel TempsHeures : réel Temporaire : réel Algorithme: Debut Ecrire("Saisir un temps en secondes") Lire(EntreeSecondes) TempsHeure <- EntreeSecondes div 3600 Temporaire <- EntreeSecondes reste 3600
TempsMinutes <- Temporaire div 60
Temporaire <- Temporaire reste 60
Ecrire("Temps : ", TempsHeure, ":", TempsMinutes, ":", Temporaire)
Fin