Excellent! Une autre partie?

Bonjour!
Ce sera 
s'il-vous-plait.

Recommencer

Le compte est bon, 
je vous remercie!

Voilà! Je crois que le compte est bon!

Désolé, 
mais le compte 
n'est pas juste...

Indice

Cliquez les pièces du bas
pour les ajouter.

Cliquez les pièces du haut
pour les retirer.

listeMélangée: {0.1, 0.25, 0.25, 0.25, 0.05, 0.1, 0.05, 0.25, 0.1, 0.1, 0.25, 0.1, 0.05, 0.05, 0.05}
nbDePieces = 7
listePartielle = Take(listeMélangée, 1, nbDePieces)
montantDesire = Sum(listePartielle)
listeArgent: {0.05, 0.05, 0.05, 0.05, 0.05, 0.1, 0.1, 0.1, 0.1, 0.1, 0.25, 0.25, 0.25, 0.25, 0.25}
tMontant: "" + (Text[floor(montantDesire)]) + "," + (Text[Last[Text[(montantDesire * 100)], 2]]) + "$"
solution = 0
nb5c = 0
nb10c = 0
nb25c = 0
nb1d = 0
nb2d = 0
A = (12.956762952816854, -6.043237047183148)
B = (26, -6)
D = (22, -6)
F = (29, -6)
C = (18, -6)
A_1 = (13.012304472933565, 7.984402826416392)
A_2 = (13.012304472933565, 5.995498655991572)
A_3 = (13.012304472933565, 4.006594485566752)
A_4 = (13.012304472933565, 2.0176903151419316)
A_5 = (13.012304472933565, -0.014450902466037122)
C_1 = (17.98456489899551, 7.984402826416392)
C_2 = (17.98456489899551, 5.995498655991572)
C_3 = (17.98456489899551, 4.006594485566752)
C_4 = (17.98456489899551, 2.0176903151419316)
C_5 = (17.98456489899551, -0.014450902466037122)
D_1 = (22.00561028702822, 8.978854911628803)
D_2 = (22.00561028702822, 6.989950741203982)
D_4 = (22.00561028702822, 5.001046570779162)
D_5 = (22.00561028702822, 3.0121424003543416)
D_6 = (22.00561028702822, 0.980001182746373)
B_1 = (25.98341862787778, 10.01654404402436)
B_2 = (25.98341862787778, 7.984402826416392)
B_3 = (25.98341862787778, 5.995498655991572)
B_4 = (25.98341862787778, 4.006594485566752)
B_5 = (25.98341862787778, 2.0176903151419316)
B_6 = (25.98341862787778, -0.014450902466037122)
F_1 = (29.0100119306981, 7.984402826416392)
F_2 = (29.0100119306981, 5.995498655991572)
F_3 = (29.0100119306981, 4.006594485566752)
F_4 = (29.0100119306981, 2.0176903151419316)
F_5 = (29.0100119306981, -0.014450902466037122)
affiche5c: 1
montantDonne: (nb10c * 0.1) + nb1d + (nb2d * 2) + (nb5c * 0.05) + (nb25c * 0.25)
difference: montantDonne - montantDesire
tIndice: "Il " + (If[difference < 0, "manque", "y a"]) + " " + (floor(abs(difference))) + "." + (If[abs(difference) ≟ 0.05, "05", Last[Text[(difference * 100)], 2]]) + "$ " + (If[difference > 0, "en trop", ""]) + ""
cIndice = false