Section courante

A propos

Section administrative du site

LABEL

Étiquette
Virtual Pascal  

Syntaxe

Label etiq1,etiq2,...;

Paramètres

Nom Description
etiq1, etiq2 Ce paramètre permet d'indiquer le nom des étiquettes

Description

Ce mot réservé permet de définir des étiquettes utilisable habituellement par l'instruction «GOTO» ou comme adressage dans le code assembleur.

Exemple

Cet exemple permet de montrer l'utilisation de se mot réservé :

  1. Program LabelSamples;
  2.              
  3. Label 10,BreakAll;
  4.           
  5. Var
  6.  i,j:Integer;
  7.           
  8. BEGIN
  9.  Goto 10;
  10.  Exit;
  11. 10:
  12.  For i:=0 to 10 do Begin
  13.   If i < 0 Then Goto BreakAll;
  14.  End;
  15.  For j:=0 to 10 do Begin
  16.   WriteLn('J = ',j);
  17.  End;
  18. BreakAll:
  19. END.

on obtiendra le résultat suivant :

J = 0
J = 1
J = 2
J = 3
J = 4
J = 5
J = 6
J = 7
J = 8
J = 9
J = 10


Dernière mise à jour : Vendredi, le 29 juillet 2016