Un convertisseur qui n'est plus utilisé --------------------------------------- PROGRAM:EUFREU Effacer entrées 0→C:0→E:0→F EffÉcran Disp "0 à 4 pour choisir Francs" Disp "5 à 9 pour choisir l'Euro" Input "Euro ou Franc ? ",C If C<5 Then Input "Combien de Francs ? ",F F/6.55957→E arrondir(E,2)→E Output(5,1,E) Output(5,11,"Euro.") Else Input "Combien d'Euros ? ",E E*6.55957→F arrondir(F,2)→F Output(5,1,F) Output(5,12,"Fr.") End Pause EffÉcran Effacer entrées