DEBUT compteBonbon (réel argent, réel prixUnit)
entier nbBonbon <- 0
if argent > 0 ET prixUnit > 0
Tant que argent > prixUnit
nbBonbon = nbBonbon + 1
argent = argent - prixUnit
retourner nbBonbon
sinon
retourner 0
fin si
retourner 0
FIN compteBonbon