Liberty basic
Résolu/Fermé
g76
Messages postés
506
Date d'inscription
mardi 18 décembre 2007
Statut
Membre
Dernière intervention
4 décembre 2008
-
2 mai 2008 à 23:50
jm97 - 9 mai 2009 à 17:43
jm97 - 9 mai 2009 à 17:43
A voir également:
- Liberty basic
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual basic - Télécharger - Langages
- Quick basic - Télécharger - Édition & Programmation
- File renamer basic - Télécharger - Gestion de fichiers
- Liberty play ✓ - Forum Consommation & Internet
22 réponses
g76
Messages postés
506
Date d'inscription
mardi 18 décembre 2007
Statut
Membre
Dernière intervention
4 décembre 2008
54
3 mai 2008 à 00:57
3 mai 2008 à 00:57
moi aussi je revien demain mes yeux se ferme et la fatigue s'installe.
Bonne nuit
Bonne nuit
Salut g76
Si je n'arrive pas trop tard.... essayez donc ces lignes de codes
print "Combien de bouteilles";
input,nbBouteilles
print "Prix d'une bouteille";
input prix
' Si on commande plus que 5 bouteilles, le prix est diminué d'un euro
' A condition que ce prix ne tombe pas en dessous de 1 euro.
if nbBouteilles>5 then
if (prix-1)>=1 then prix=prix-1
end if
total = prix*nbBouteilles
Print "Prix d'une bouteille : " + Str$(prix) + " euros."
Print "Total : " + Str$(prix*nbBouteilles) + " euros."
Si je n'arrive pas trop tard.... essayez donc ces lignes de codes
print "Combien de bouteilles";
input,nbBouteilles
print "Prix d'une bouteille";
input prix
' Si on commande plus que 5 bouteilles, le prix est diminué d'un euro
' A condition que ce prix ne tombe pas en dessous de 1 euro.
if nbBouteilles>5 then
if (prix-1)>=1 then prix=prix-1
end if
total = prix*nbBouteilles
Print "Prix d'une bouteille : " + Str$(prix) + " euros."
Print "Total : " + Str$(prix*nbBouteilles) + " euros."
