Lorsque vous traitez avec le temps Pascal , vous calculez la quantité de temps entre les deux événements différents . Par exemple, vous pouvez vérifier le temps qu'il fait partie d'un programme à exécuter , ou voir combien de temps quelqu'un a été connecté ou de suivre le temps lors d'un test à choix multiples. Une fois que vous collectez deux moments différents , vous encodez en une forme numérique , soustraire , puis afficher la différence de temps . Instructions
1

Ouvrez votre fichier source Pascal dans un éditeur de texte tel que le Bloc-notes Windows
2

Tapez le code suivant au début de votre fichier : .
< p> Exemple de programme ;

Utilise Dos ;

Utilise sysutils ;

utilisation de " Dos " permet d'accéder à la fonction " GetTime " . En utilisant " sysutils " permet d'accéder aux fonctions " DecodeTime " " EncodeTime " et
3

déclarer des variables qui stockent les valeurs de temps en ajoutant le code suivant: .

Var Photos

hOUR1 , Min1 , Sec1 , HSec1 : mot ;

heure2 , Min2 , SEC2 HSec2 : mot ;

heure3 , Min3 , Sec3 , MSec3 : mot ; < br >

x , y, z: TDateTime ;
4

Obtenir la première fois au début de votre fonction en ajoutant le code suivant:

début

GetTime ( hOUR1 , Min1 , Sec1 , HSec1 ) ;
5

Effectuer le code principal de votre fonction et ensuite appeler " GetTime " à nouveau en ajoutant le code suivant:

GetTime ( heure2 , Min2 , SEC2 HSec2 ) ;
6

calculer la différence entre les deux fois en ajoutant le code suivant:

x: = EncodeTime ( hOUR1 , Min1 , Sec1 , 0);

y: = EncodeTime ( heure2 , Min2 , Sec2 , 0);

z: = y - x ;

DecodeTime (z, heure3 , Min3 , Sec3 , MSec3 ) ;

la fonction " EncodeTime " convertit le temps en une valeur " TDateTime " , qui est stocké comme un «double». Le code soustrait les deux fois, puis décode le résultat dans un format imprimable
7

afficher le décalage horaire avec la fonction " writeln " en ajoutant le code suivant: .

Writeln (format (« décalage horaire =% d :% d :% d ', [ heure3 , Min3 , Sec3 ] ) ) ;

Fin
8

Enregistrez votre fichier , compiler et exécuter . le programme pour afficher les mesures de temps .