Algorithme Calcul_valeur_absolue
{
        variable N : réel
        
        Afficher("Cet algorithme calcule la valeur absolue d'un nombre.\n")
        
        Afficher("Saisir le nombre : ")
        Saisir(N)
        
        Si (N<0) alors
        {
                N <-- -N
        }

        Afficher("La valeur absolue du nombre saisi est ", N, ".\n")
}