Langage de programmation - Oberon - Référence de procédures

DEC	Décrémente
Oberon

Syntaxe

PROCEDURE DEC(s,n);

PROCEDURE DEC(s);

Paramètres

Nom	Description
s	Ce paramètre permet d'indiquer la variable à traiter
n	Ce paramètre permet d'indiquer la valeur à ajouter à la variable

Description

Cette procédure effectue la décrémentation de 1 ou de N d'une variable.

Algorithme

MODULE DEC(REFERENCE X)
X ← X - 1

MODULE DEC(REFERENCE X, valeur)
X ← X - valeur

Remarques

Si le paramètre «n» (le deuxième paramètre) n'est pas spécifié, l'Oberon décrémentera la variable de 1.
Il est préférable d'utiliser cette procédure plutôt que d'effectuer un «s := s - 1;», car le code est plus petit et plus rapide que l'utilisation de ce calcul manuellement. Au niveau du code machine du microprocesseurs de la famille 80x86, il utilisera l'instruction «DEC» ou «SUB» plutôt que 3 instructions d'assembleurs.

Exemple

Voici un exemple de l'utilisation de la procédure «DEC» :


			
				
MODULE DecSamples;

     

IMPORT Out;

             


VAR

 I:INTEGER;

            

BEGIN

 I := 14;


 WHILE I > 5 DO

  Out.String("I = ");


  Out.Int(I,1);

  Out.Ln;


  DEC(I,2);

 END;

 WHILE I > 0 DO


  Out.String("I = ");

  Out.Int(I,1);


  Out.Ln;

  DEC(I);

 END;


END DecSamples.

on obtiendra le résultat suivant :

I = 14 I = 12 I = 10 I = 8 I = 6 I = 4 I = 3 I = 2 I = 1

Dernière mise à jour : Samedi, le 7 avril 2018

Section courante

A propos

Section administrative du site

DEC