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

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