Bonjour,
J'aimerais savoir combien de tps un de mes programmes met pour s'exécuter.. Quelque chose comme:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 begin tempsDebut:=time; repeat ....{boucle principale} until tempsFin:=time; writeln('Temps de calcul:',tempsFin-tempsDebut,' secondes'); end;
Je pensais utiliser la fonction time, mais on ne peux pas obtenir une précision à la seconde (ça retourne qqc de la forme xxxx,xx, où la partie fractionnaire représente le nombre d'heure écoulé depuis 12am je crois).
Comment faire pour obtenir une précision à la seconde?
Merci.
Partager