Section courante

A propos

Section administrative du site

END

Fin
Turbo Pascal 1+

Syntaxe

End

Description

Cette instruction permet de définir la fin d'un bloc d'instruction, d'un enregistrement (RECORD) ou d'une évaluation de cas (CASE OF).

Exemple

Voici quelques exemples typiques de l'utilisation de ce mot clef :

Essayer maintenant !
  1. Program EndSamples;
  2.  
  3. Procedure ProcA;Begin
  4.  WriteLn('Bonjour B');
  5. End;
  6.  
  7. Var
  8.  I:Byte;
  9.  
  10. BEGIN
  11.  For I := 1 to 3 do Begin
  12.   WriteLn('Bonjour A');
  13.  End;
  14.  ProcA;
  15.  Case 3 of
  16.   1:WriteLn('Bonjour 1');
  17.   2:WriteLn('Bonjour 2');
  18.   3:WriteLn('Bonjour 3');
  19.  End; 
  20. END.

on obtiendra le résultat suivant :

Bonjour A
Bonjour A
Bonjour A
Bonjour B
Bonjour 3

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 155 à 156.

Dernière mise à jour : Dimanche, le 25 janvier 2015