Algo Calculatrice
{
    variables:
    a, b, r: réels
    op : caractères
    
    Afficher("Donner la valeur du premier opérande :")
    saisir(a)
    Afficher("Donner l'opérateur (+ - * ou /) :")
    saisir(op)
    Afficher("Donner la valeur du deuxième opérande :")
    saisir(b)
    
    si (op='/') alors
    {
      si (b=0) alors
      {
        Afficher("La division par 0 est impossible")
      }
      sinon
      {
        r <-- a / b
        Afficher("Le résultat de ", a, " ", op, " ", b, " = ", r)
      }
    }
    
    si (op = '+') alors
    {
       r <-- a + b
       Afficher("Le résultat de ", a, " ", op, " ", b, " = ", r)
    }
    
    si (op = '-') alors
    {
       r <-- a - b
       Afficher("Le résultat de ", a, " ", op, " ", b, " = ", r)
    }

    si (op = '*') alors
    {
       r <-- a * b
       Afficher("Le résultat de ", a, " ", op, " ", b, " = ", r)
    }

}