Algorithme Calculatrice
{
        variable op1,op2, res : réel
                 operateur : caractère
                 possible : booléen
        
        Afficher("Donner la valeur du premier opérande : ")
        Saisir(op1)
        Afficher("Donner l'opérateur (+ - * ou /) : ")
        Saisir(operateur)
        Afficher("Donner la valeur du deuxième opérande : ")
        Saisir(op2)
        
        possible <-- VRAI

        Selon (operateur)
        {
                '+': res <-- op1 + op2
                '-': res <-- op1 - op2
                '*': res <-- op1 * op2
                '/': Si (op2 = 0) alors
                     {
                        Afficher("Le calcul est impossible\n")
                        possible <-- FAUX
                     }
                     sinon
                     {
                        res <-- op1 / op2
                     }
        }
        
        Si (possible) alors
        {
                Afficher("Le résultat est : ", res, "\n")
        }
}