Programation

ufs -  
nabil-bago Messages postés 289 Statut Membre -
Bonjour,

je voulais la solution de M:ecrire un programme en delphi qui calcule la valeur absolue d'un nombre (positifs ou negatif) sans utiliser la fonction prédéfinie abs
exemple: |-5|=5;|5|=5

2 réponses

  1. nabil-bago Messages postés 289 Statut Membre 13
     
    var
    nbr,abs:real;
    begin
    if Nbr < 0 then 
       abs := nbr * (-1)
    else
      abs:=nbr
    end;
    
    0