Algorithme Pythagore_menu
{
    variable aire, perimetre, a,b : réel
             choix : entier 
    constante reel PI <-- 3.14
                
    Repeter
    {
        Afficher("Tapez le numéro de la forme pour laquelle vous voulez calculer l'Aire et le périmetre :\n")
        Afficher("1) Carré\n")
        Afficher("2) Rectangle\n")
        Afficher("3) Cercle\n")
        Afficher("0) POUR SORTIR d'ICI\n")
        Saisir(choix)
        
        Selon (choix)
        {
            1 : Afficher("Saisissez la longueur d'un coté du carré :")
                Saisir(a)
                aire <-- a * a
                perimetre <-- 4 * a
            2 : Afficher("Saisissez la longueur des cotés du rectangle :")
                Saisir(a,b)
                aire <-- a * b
                perimetre <-- 2 * a + 2 * b
            3 : Afficher("Saisissez la longueur du rayon du cercle :")
                Saisir(a)
                aire <-- PI * a*a
                perimetre <-- 2 * PI* a
        }
        Afficher("Pour la forme choisie, l'aire est ",aire," et le périmetre est ", perimetre,".\n")
    } jusqu'à (choix = 0)
}