SOS Probleme Programme ti 82 stat.fr
Résolu/Fermé
SuperMegaMaiden
Messages postés
30
Date d'inscription
mardi 18 septembre 2012
Statut
Membre
Dernière intervention
4 septembre 2015
-
Modifié par SuperMegaMaiden le 18/09/2012 à 22:50
Cengokill - 5 déc. 2012 à 17:23
Cengokill - 5 déc. 2012 à 17:23
A voir également:
- SOS Probleme Programme ti 82 stat.fr
- Programme demarrage windows 10 - Guide
- Supprimer programme ti 83 - Forum calculatrices
- Programme démarrage windows 10 - Guide
- Ce message d'erreur apparaît sur l'ordinateur d'elena. que peut-on dire du programme gwxux ? - Forum logiciel systeme
- Supprimer programme ti 82 ✓ - Forum calculatrices
3 réponses
essaie ainsi :
:Disp "FILLES, TAPEZ 1"
:Input ",GARCONS 2 ",A
:if A=1
:then
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Ligne(-1,-3,1,-3)
:Ligne(0,-2,1,-3)
:Ligne(0,-2,-1,-3)
:end
:If A=2
:then
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:end
ou comme ça pour économiser des octets:
:Disp "FILLES, TAPEZ 0"
:Input ",GARCONS 1 ",A
:if A
:then
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Ligne(-1,-3,1,-3)
:Ligne(0,-2,1,-3)
:Ligne(0,-2,-1,-3)
:Else
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:end
courage dans la suite
:Disp "FILLES, TAPEZ 1"
:Input ",GARCONS 2 ",A
:if A=1
:then
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Ligne(-1,-3,1,-3)
:Ligne(0,-2,1,-3)
:Ligne(0,-2,-1,-3)
:end
:If A=2
:then
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:end
ou comme ça pour économiser des octets:
:Disp "FILLES, TAPEZ 0"
:Input ",GARCONS 1 ",A
:if A
:then
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Ligne(-1,-3,1,-3)
:Ligne(0,-2,1,-3)
:Ligne(0,-2,-1,-3)
:Else
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:end
courage dans la suite
SuperMegaMaiden
Messages postés
30
Date d'inscription
mardi 18 septembre 2012
Statut
Membre
Dernière intervention
4 septembre 2015
8 oct. 2012 à 22:19
8 oct. 2012 à 22:19
Repondez s'il vous plait ca me bloque vraiment dans mon aprentissage de la programation
Il faut penser à EFFACER LE DESSIN à la fin sinon ça fausse les dessins, donc essaies ainsi : essaie ainsi :
:Disp "FILLES, TAPEZ 1"
:Input ",GARCONS 2 ",A
:if A=1
:then
:EffDessin
:AxesNaff
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Ligne(-1,-3,1,-3)
:Ligne(0,-2,1,-3)
:Ligne(0,-2,-1,-3)
:Pause
:EffDessin
:end
:If A=2
:then
:EffDessin
:AxesNaff
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Pause
:EffDessin
:end
:Disp "FILLES, TAPEZ 1"
:Input ",GARCONS 2 ",A
:if A=1
:then
:EffDessin
:AxesNaff
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Ligne(-1,-3,1,-3)
:Ligne(0,-2,1,-3)
:Ligne(0,-2,-1,-3)
:Pause
:EffDessin
:end
:If A=2
:then
:EffDessin
:AxesNaff
:Cercle(0,0,1)
:Ligne(0,-1,1,-2)
:Ligne(0,-1,-1,-2)
:Ligne(0,-1,0,-3)
:Ligne(0,-3,1,-5)
:Ligne(0,-3,-1,-5)
:Pause
:EffDessin
:end