fonction puissance(E x:réel, E n: entier):réel
{
        variable i : entier
                 resultat : réel
                 
         resultat <-- 1
         
        Pour i de 1 à n
        {
                resultat <-- resultat * x
        } 
        
        retourne resultat
}