1+ /****************************************** EXERCICE 19 *******************************************/
2+
3+ FONCTION afficherMenuDevise
4+ VARIABLES
5+ msg : CHAINE DE CARACTERE
6+ DÉBUT
7+ msg → "****************************************\n"
8+ msg → msg + "$ ou Dollars (US)\n"
9+ msg → msg + "Roubles (Russie)\n"
10+ msg → msg + "Yuans (Chine)\n"
11+ msg → msg + "£ ou Livres (Royaume-Uni)\n"
12+ AFFICHER msg
13+ FIN
14+
15+ ALGORITHME main
16+ VARIABLES
17+ CONSTANTE DECIMAL DOLLAR → 1,22
18+ CONSTANTE DECIMAL ROUBLE → 91,14
19+ CONSTANTE DECIMAL YUAN → 7,89
20+ CONSTANTE DECIMAL LIVRE → 0,89
21+ montant,montantConverti : DECIMAL
22+ devise : CHAINE DE CARACTERE
23+ DÉBUT
24+ AFFICHER "Saisir la somme en euro à convertir : "
25+ SAISIR somme
26+
27+ afficherMenuDevise()
28+ montantConverti → 0
29+
30+ FAIRE
31+ AFFICHER "Saisir la devise souhaitée : "
32+ SAISIR devise
33+ SELON devise
34+ CAS "$" : montantConverti → DOLLAR * montant
35+ CAS "Dollars" : montantConverti → DOLLAR * montant
36+ CAS "Roubles" : montantConverti → ROUBLE * montant
37+ CAS "Yuans" : montantConverti → YUAN * montant
38+ CAS "£" : montantConverti → LIVRE * montant
39+ CAS "Libres" : montantConverti → LIVRE * montant
40+ AUTREMENT : AFFICHER "La devise choisie n'est pas prise en compte"
41+ FINSELON
42+ TANT QUE (montantConverti = 0)
43+
44+ AFFICHER montant, "€ = ", montantConverti, " ", devise
45+ FIN
0 commit comments