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

ABS	Valeur absolue
Oberon

Syntaxe

PROCEDURE ABS(n:expression numérique):expression numérique;

Paramètres

Nom	Description
n	Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter

Description

Cette procédure permet de retourner la valeur absolue d'une expression numérique. Ainsi, le signe (négatif), s'il existe, est retiré de façon à conserver uniquement les chiffres du nombre sans toutefois changer sa valeur. Voici un graphique de représentation de la distribution de cette valeur :

Algorithme

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

Remarques

La valeur absolue qu'utilise le langage de programmation de Oberon utilise les mêmes règles que celle de la fonction mathématique absolue «|x|».
Les mathématiciens expriment cette fonction de la façon suivante : f(x) = | x |, laquelle correspond au trois définitions suivantes :

SI x > 0 ALORS | x | = x,
SI x < 0 ALORS | x | = - x,
SI x = 0 ALORS | x | = 0.

La valeur absolue, par définition, enlève le signe. Donc, on ne peut pas recevoir un nombre négatif comme résultat.

Exemples

Voici un exemple montrant une utilisation de la valeur absolue avec des parenthèses :


			
				
MODULE Abs1;

 
IMPORT Out;

     


BEGIN

 Out.String("Abs(9*(-7))=");

 Out.Int(ABS(9*(-7)),1);


 Out.Ln;

END Abs1.

on obtiendra le résultat suivant :

Abs(9*(-7))=63

Voici un exemple montrant une utilisation plus classique de la valeur absolue :


				
MODULE Abs2;

 
IMPORT Out;

     


BEGIN

 Out.String("Abs(1)=");

 Out.Int(ABS(1),1);


 Out.Ln;

 Out.String("Abs(-1)=");

 Out.Int(ABS(-1),1);


 Out.Ln;

 Out.String("Abs(30.2)=");

 Out.Real(ABS(30.2));


 Out.Ln;

 Out.String("Abs(-35.4)=");

 Out.Real(ABS(-35.4));


 Out.Ln;

END Abs2.

on obtiendra le résultat suivant :

Abs(1)=1 Abs(-1)=1 Abs(30.2)=30.2 Abs(-35.4)=35.4

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

Section courante

A propos

Section administrative du site

ABS