Section courante

A propos

Section administrative du site

ABS

 Valeur absolue
IBM Personal Computer Pascal

Syntaxe

Function ABS(X:REAL):REAL;
Function ABS(X:INTEGER):INTEGER;
Function ABS(X:WORD):INTEGER;
Function ABS(X:INTLONG):INTLONG;

Paramètres

Nom Description
X Ce paramètre permet d'indiquer l'expression à calculer.

Description

Cette fonction permet de retourner la valeur absolue d'une expression numérique.

Algorithme

MODULE ABS(valeur)
   SI valeur < 0 ALORS
      RETOURNE - valeur
   SINON
      RETOURNE valeur
   FIN SI

Exemple

L'exemple suivant permet d'affecter des variables X et Y et de retourner des valeurs absolues :

  1. Program ABS0(Input,Output);
  2.  
  3. Var 
  4.  X:INTEGER;
  5.  Y:WORD;
  6.  
  7. BEGIN
  8.  Y:=1;
  9.  X:=ABS(Y);
  10.  WriteLn('ABS(X)=',X);
  11.  WriteLn('ABS(-1)=',ABS(-1));
  12. END.

on obtiendra le résultat suivant :

ABS(X)=             1
ABS(-1)=             1

Dernière mise à jour : Dimanche, le 19 avril 2020