 Le Forum de TI-BANK.fr Le forum de la banque de programmes pour calculatrices graphiques Texas Instruments (aide débutants, résolution problèmes...). |
| | Aller à la page : 1, 2, 3 | | Auteur | Message |
|---|
charognard Vétéran


   Age : 41 Inscrit le : 18 Oct 2007 Messages : 383 Localisation : indre et loire Calculatrice : TI NSPIRE CAS, CANON X07, HP48GX, HP11C, SHARP PC1262, PC1360, PC1246, PC1600, PC1500, CASIO FX790P Classe : sans
Impureté:
   (47/450) Dernière note en maths: 11/20
| Sujet: Re: Mes petits programmes Mar 13 Nov - 23:03 | |
| ça (de plus ce code en ... merdiq....)
If A>=1000 Then iPart(A/100->H 100fPart(A/100->J End If A<1000 Then Lbl 0 Input "SIECLE: ",H Input "ANNEE DS SIECLE: ",J H-1->H Goto 2 End If A>=10000 Goto 0 Lbl 2
par
If A>=1000 AND A<10000 Then iPart(A/100->H 100fPart(A/100->J ELSE Input "SIECLE: ",H Input "ANNEE DS SIECLE: ",J H-1->H End
Dernière édition par le Mar 13 Nov - 23:09, édité 1 fois |
|  | | charognard Vétéran


   Age : 41 Inscrit le : 18 Oct 2007 Messages : 383 Localisation : indre et loire Calculatrice : TI NSPIRE CAS, CANON X07, HP48GX, HP11C, SHARP PC1262, PC1360, PC1246, PC1600, PC1500, CASIO FX790P Classe : sans
Impureté:
   (47/450) Dernière note en maths: 11/20
| Sujet: Re: Mes petits programmes Mar 13 Nov - 23:04 | |
| il y en a encore pas mal à optimiser mais chacun son tour ;-) |
|  | | tama Animateur


   Age : 16 Inscrit le : 19 Déc 2005 Messages : 9389 Localisation : quelque part en France... Calculatrice : TI-84+, TI89 tita HW3, TI89 tita HW4 (eh oui, 3 TI :#geek#:) Classe : Terminale S spé maths
Impureté:
   (-9/500) Dernière note en maths: 13/20
| Sujet: Re: Mes petits programmes Mer 14 Nov - 0:03 | |
| | charognard a écrit: | tu dois aussi pouvoir remplacer, théoriquement (je n'ai pas de Z80 TI)
If M=1 13->M If M=2 14->M M-2->M
par
(M=1)*13+(M=2)*12->M |
nan il me semble pas c'est pas 14-2=12 dans tous les cas on doit enlever 2 à M
donc ça serait plutôt (M=1)*11+(M=2)*12->M _________________ <EMBED src="http://download.makeinflash.com/cd_digital_v1.swf?id=mnwGcj1G-uGE7zMA6uMA6uMB4JNHD1cLR8vY7d0H7G0FOt-F-9c0Q8DLD0NgRjYEP94H-M" quality=high WIDTH="200" HEIGHT="50"NAME="cd_digital_v1.swf" ALIGN="" TYPE="application/x-shockwave-flash"PLUGINSPAGE="http://www.macromedia.com/go/getflashplayer" FlashVars="id=mnwGcj1G-uGE7zMA6uMA6uMB4JNHD1cLR8vY7d0H7G0FOt-F-9c0Q8DLD0NgRjYEP94H-M"></EMBED> (1 an tst) |
|  | | tama Animateur


   Age : 16 Inscrit le : 19 Déc 2005 Messages : 9389 Localisation : quelque part en France... Calculatrice : TI-84+, TI89 tita HW3, TI89 tita HW4 (eh oui, 3 TI :#geek#:) Classe : Terminale S spé maths
Impureté:
   (-9/500) Dernière note en maths: 13/20
| |  | | charognard Vétéran


   Age : 41 Inscrit le : 18 Oct 2007 Messages : 383 Localisation : indre et loire Calculatrice : TI NSPIRE CAS, CANON X07, HP48GX, HP11C, SHARP PC1262, PC1360, PC1246, PC1600, PC1500, CASIO FX790P Classe : sans
Impureté:
   (47/450) Dernière note en maths: 11/20
| Sujet: Re: Mes petits programmes Mer 14 Nov - 8:44 | |
| | tama a écrit: | | charognard a écrit: | tu dois aussi pouvoir remplacer, théoriquement (je n'ai pas de Z80 TI)
If M=1 13->M If M=2 14->M M-2->M
par
(M=1)*13+(M=2)*12->M |
nan il me semble pas c'est pas 14-2=12 dans tous les cas on doit enlever 2 à M
donc ça serait plutôt (M=1)*11+(M=2)*12->M |
oui bien sur, erreur de ma part je me suis fais avoir par le basic TI (then ou pas ==> multiligne ou pas) |
|  | | charognard Vétéran


   Age : 41 Inscrit le : 18 Oct 2007 Messages : 383 Localisation : indre et loire Calculatrice : TI NSPIRE CAS, CANON X07, HP48GX, HP11C, SHARP PC1262, PC1360, PC1246, PC1600, PC1500, CASIO FX790P Classe : sans
Impureté:
   (47/450) Dernière note en maths: 11/20
| |  | | Xywez Animateur


   Age : 18 Inscrit le : 11 Mai 2006 Messages : 3021 Localisation : Paris Calculatrice : Ti 84 + SE Classe : 1ère année ISEP (après une PCEM1)
Impureté:
   (32/450) Dernière note en maths: 18/20 au bac (et en spé maths bien sur!!)
| Sujet: Re: Mes petits programmes Ven 16 Nov - 17:55 | |
|
[size=12]enfin tu me dira les 2 filles encore sa peu aller [/size] _________________

Je met ici à dispo MA sélection pour le bac : ici |
|  | | |
| Page 3 sur 3 | Aller à la page : 1, 2, 3 |
| | Permission de ce forum: | Vous ne pouvez pas répondre aux sujets dans ce forum
| | |
| |
|