Exercice 1 :
Algorithme Puissance ;
var : A,B,i : entier ;
Debut
Ecrire ( ' Entrer La valeur d'un nombre ' );
Lire ( A );
Ecricre ( ' Entrer La valeur de son exposant ' );
Lire ( B);
Puiss := 1 ;
Pour i de 1 à B faire
Puiss := Puiss * A ;
finpour
Ecricre ( ' Le résultat de ', A , ' puissance ', B , ' est : ' Puiss);
Fin.
Exercice 2 :
Algorithme PGCD ;
var : A,B,MyPGCD : entier ;
Debut
Ecrire ( ' Entrer La valeur d'un nombre ' );
Lire ( A );
Ecricre ( ' Entrer La valeur d'un second nombre ' );
Lire ( B);
tantque ( A < > B ) faire
si ( A < B ) alors
B := B - A
sinon
A := A - B ;
finsi
fintantque
MyPGCD := A;
Ecricre ( ' Le PGCD de ', A , ' et ', B , ' est : ' MyPGCD );
Fin.
Salut
Très bon site