Aller au menu - Aller au contenu

[Plan du site] Vous êtes ici --- > Le Site du Zéro > Les forums > Programmation > Autres langages > Tout sur les TI ! > Lecture du sujet

Tout sur les TI !

Besoin d'aide ?

Vous devez être inscrit pour pouvoir poster des messages

Page : Précédente  1  2  3  ...  33  34  35  36  37  38  39  40  41  42  Suivante
Auteur Message
1 visiteur sur ce sujet (1 anonyme)
Page : Précédente  1  2  3  ...  33  34  35  36  37  38  39  40  41  42  Suivante
Hors ligne myst6re # Posté le 18/10/2008 à 00:40:31
bip bip bip
Avatar
Groupe : Membres
Reprise du dernier message de la page précédente :
1: J'ai pas de ti 89 ^^

2: Une boucle c'est un truc (ça commence bien) qui permet d'éviter de répéter plusieurs fois la même chose

Exemple :
Code : Autre
1
2
3

:for(A,1,4
:Disp A
:End

Est équivalent à :
Code : Autre
1
2
3
4

:Disp 1
:Disp 2
:Disp 3
:Disp 4

Les deux codes ci-dessus vont afficher :
Code : Autre
1
2
3
4

1
2
3
4


Cette boucle va commencer à A=1 et va s'exécuter jusqu'à ce que A=4. À chaque fois qu'il arrivera au "End", il ajoutera 1 à A.

Syntaxe de for( :
For(Variable,Début,Fin[,Pas])
...
End
Le "Pas" en fait c'est combien il ajoute à la Variable à la fin d'un tour de boucle :
Reprenons l'exemple précédent :
Code : Autre
1
2
3

:for(A,1,20,5
:Disp A
:End

Est équivalent à :
Code : Autre
1
2
3
4

:Disp 1
:Disp 6
:Disp 11
:Disp 16

Les deux code ci-dessus vont afficher :
Code : Autre
1
2
3
4

1
6
11
16


Alors, tu comprends mieux maintenant ? (avec un prof comme moi je suis sûr que oui :p )

Allez, il te reste encore les "while" et les "repeat" à apprendre :)
Édité le 18/10/2008 à 00:41:10 par myst6re
Image utilisateur

Un éditeur On-line de TI-Basic ? C'est possible ! TI-Editor !!
 
Hors ligne thonylover # Posté le 18/10/2008 à 13:40:17
Groupe : Membres
merciiiii j'ai tout compris...on peut faire alors un temps avec le for(

ex:

Code : Autre
1

for(T,500,0


T : le temps
et T commence à 500 jusqu'à arriver à 0


en faite, ce que je veux faire c'est un programme qui demande à l'utilisateur d'appuyer sur la touche correspondante à la valeur affichée et ceux le plus rapidement possible en 500 secondes.

donc voilà mon code mais je ne sait pas ou incorporer mon temps


:ClrHome
:Disp"RAPID(getKey))))"
:Output(3,1,"TEMPS _ :")
:Output(5,1,"TOUCHES :")
:Output(7,1,"APPUYE SUR :")
:500->T:0->C
:Lbl 0
:10randInt(1,10)+randInt(1,5)->K
:If K=35
:Goto 0
:If K=101
:26->K
:Output(7,16," ")
:Output(7,14,K
:Repeat T=0
:T-1->T
:If getKey=K
:Then
:T+11->T
:C+1->C
:Output(5,11,C)
:Goto 0
:End
:Output(3,11," _ ") _ doit être remplacé par un espace
:Output(3,11,T)
:End Fin de la boucle :
:Output(1,1,((PERDU)))))))))")
:Pause

LES NUMEROS AFFICHER SONT LES VALEUR EN bASIC DES TOUCHES
Mais je ve une boucle for( pour optimiser mon programme
mais je sais pas comment la mettre...:)

Merci à tous et surtout myst6re qui m'a drolement aidez
mais bon je stagne encore sur le snake
et oui la graphisme j'y arrive pas!!!!

Édité le 18/10/2008 à 14:26:03 par thonylover
Hors ligne myst6re # Posté le 19/10/2008 à 22:46:02
bip bip bip
Avatar
Groupe : Membres
Code : Autre
1

for(T,500,0


Fonctionnera mal voyons... si à chaque fin de boucle il ajoute 1 à T, alors les valeurs de T vont être :
500
501
Et... c'est tout

En même temps je sais pas trop ce que tu veux faire...

Bon, voila la solution :

Code : Autre
1

for(T,500,0,-1


Là les valeurs successives de T vont être :
500
499
498
[...]
2
1
0

sinon bah tu peux aussi mettre

Code : Autre
1

for(T,0,500


Ce qui va faire... j'te laisse deviner.

Rappel :
For(Variable,Début,Fin[,Pas])

Le pas n'est pas obligatoire, s'il n'est pas indiqué, pas=1

Bon, et je t'avoue que j'ai pas tout compris de ton prog :p
Édité le 19/10/2008 à 22:46:47 par myst6re
Image utilisateur

Un éditeur On-line de TI-Basic ? C'est possible ! TI-Editor !!
 
Hors ligne thonylover # Posté le 21/10/2008 à 18:28:00
Groupe : Membres
Mon prgm ... ohhhhhhh alors !!!
Il est simple voyons...c'est un jeu qui tentraine a retenir les valeur basic des touches de la calto.

ex: Y= correspond a la valeur 11
windows correspond a la valeur 12
2nd corespond a la valeur 21
on correspond a la valeur 101
...
Hors ligne w3b5t3r # Posté le 23/10/2008 à 18:55:04
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Bonjour,

je suis en seconde et viens d'acheter ma TI-82 Stats fr et evidemment cherche des jeux pour passer les interminables heures d'histoire.

or, dans le script du jeu, il y a écrit :ClrDraw -> C'est bien EffDessin en fr ?

Et par contre, j'ai :ClrHome, et là je ne trouve pas d'équivalence.

C'est quoi ?
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne Shaac # Posté le 23/10/2008 à 19:02:45
Laissez Vivre Les Squelettes
Avatar
Validateurs
Pour ClrDraw c'est bien ça.
Pour ClrHome, la traduction est EffEcr (PRGM > 8)
Citation : Pierre Dac
La mort n'est, en définitive, que le résultat d'un défaut d'éducation puisqu'elle est la conséquence d'un manque de savoir vivre.
 
Hors ligne w3b5t3r # Posté le 23/10/2008 à 20:27:54
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
merci :)

EDIT : j'ai 1->A(avec un accent) je fais quoi ?
Édité le 23/10/2008 à 21:04:25 par w3b5t3r
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne tomtom91 # Posté le 23/10/2008 à 21:37:58
...
Groupe : Membres
Bonjour,
Je suis en train de faire un petit programme pour convertir un chiffre en base 10 en base que je veux. Mon programme en lui même est correct : seul problème, je suis obligé d'afficher les chiffres du nombres transcrit 1 par 1 donc un petit peut embettant. C'est pourquoi j'ai penser a tout mettre dans une chaîne au fur et à mesure, or je ne sais pas comment mettre la valeur d'une variable dans une chaine.
Par exemple faire.
Code : Pascal
1
R=>Str1

et la evidement il me met erreur : type donnée.

Merci d'avance.
Hors ligne myst6re # Posté le 23/10/2008 à 22:30:16
bip bip bip
Avatar
Groupe : Membres


Code : Autre
1
2

10->R //Par exemple R=10
"R->Str1 //C'est comme ça qu'on stocke dans Str

Pour stocker
et
Code : Autre
1

expr(Str1->Q //Là il va voir que le texte "R" est la variable R de valeur 10 (et maintenant Q=10)

Pour extraire

Ok ?
Édité le 23/10/2008 à 22:34:31 par myst6re
Image utilisateur

Un éditeur On-line de TI-Basic ? C'est possible ! TI-Editor !!
 
Hors ligne Shaac # Posté le 23/10/2008 à 23:36:50
Laissez Vivre Les Squelettes
Avatar
Validateurs
Citation : w3b5t3r
merci :)

EDIT : j'ai 1->A(avec un accent) je fais quoi ?


Y'a pas les accents sur ta calculatrice, tu remplace par une autre variable.
Citation : Pierre Dac
La mort n'est, en définitive, que le résultat d'un défaut d'éducation puisqu'elle est la conséquence d'un manque de savoir vivre.
 
Hors ligne w3b5t3r # Posté le 24/10/2008 à 07:33:27
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
genre A ?
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne tomtom91 # Posté le 24/10/2008 à 08:02:01
...
Groupe : Membres
Citation : myst6re


Code : Autre
1
2

10->R //Par exemple R=10
"R->Str1 //C'est comme ça qu'on stocke dans Str

Pour stocker
et
Code : Autre
1

expr(Str1->Q //Là il va voir que le texte "R" est la variable R de valeur 10 (et maintenant Q=10)

Pour extraire

Ok ?


Oui ça je le sais, ce que je veux c'est mettre la valeur de R dans Str1 et pas passer par un intermédiaire. Enfaite si ça marchais ce serait parfait :
Code : Pascal
1
2
3
4
5
6
O/(B^T)=>R
"R"->Str1
expr(Str1)->Str2
Str3+Str2->Str3

//le tout étant dans un boucle comme vous avez pu vous en douter


Je rappelle que mon est de "concaténer" (<- français ça :p ?) chaque chiffre au fur et a mesure dans une chaîne.
Édité le 24/10/2008 à 08:05:30 par tomtom91
Hors ligne Shaac # Posté le 24/10/2008 à 17:30:03
Laissez Vivre Les Squelettes
Avatar
Validateurs
Citation : w3b5t3r
genre A ?


Oui, si A n'est pas utilisé par ailleurs.
Citation : Pierre Dac
La mort n'est, en définitive, que le résultat d'un défaut d'éducation puisqu'elle est la conséquence d'un manque de savoir vivre.
 
Hors ligne w3b5t3r # Posté le 24/10/2008 à 18:13:45
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Là, je dois mettre Xmax, mais sans (, je le trouve où ?

Il y est pas dans le catalogue
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne rorkaii # Posté le 24/10/2008 à 19:14:30
Avatar
Groupe : Membres
Salut ! J'vais poser une question un peu en dehors:

En ASM pour TI 83 (pas la 83plus hein ^^) y'a-t-il une fonction input comme _PUTC mais en mode GRAPH ? Car comme je commence a comprendre un peu l'ASM 83 je voulais me lancer dans un tout petit programme pour résoudre une équation de Pythagore toute simple ! mais en mode normal, c'est bien moche...
De plus j'aimerais si possible une explication toute simple sur comment mettre en place la fonction _SQROOT car mes essais sont vains ...
Hors ligne Shaac # Posté le 24/10/2008 à 20:41:49
Laissez Vivre Les Squelettes
Avatar
Validateurs
Citation : w3b5t3r
Là, je dois mettre Xmax, mais sans (, je le trouve où ?

Il y est pas dans le catalogue


VARS ENTER BAS ENTER
Citation : Pierre Dac
La mort n'est, en définitive, que le résultat d'un défaut d'éducation puisqu'elle est la conséquence d'un manque de savoir vivre.
 
Hors ligne w3b5t3r # Posté le 24/10/2008 à 21:10:30
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Désolé de demander tout le temps de l'aide, mais là c'est Xscl, et dans tes menus je trouve pas :s
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne Shaac # Posté le 24/10/2008 à 21:28:53
Laissez Vivre Les Squelettes
Avatar
Validateurs
Si tu tapes exactement sur les boutons indiqués ça va te sélectionner Xmax ...
(En faite ça fait "VARIABLES" > "Fenêtre" > "Xmax")
Citation : Pierre Dac
La mort n'est, en définitive, que le résultat d'un défaut d'éducation puisqu'elle est la conséquence d'un manque de savoir vivre.
 
Hors ligne w3b5t3r # Posté le 24/10/2008 à 21:33:18
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Citation : w3b5t3r
Désolé de demander tout le temps de l'aide, mais là c'est Xscl, et dans tes menus je trouve pas :s


Je trouve Xscl où ? pour Xmin et Xmax j'ai trouvé ^^

Est-ce codeTouche ?
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne Shaac # Posté le 24/10/2008 à 21:37:53
Laissez Vivre Les Squelettes
Avatar
Validateurs
Xscl c'est Xgrad. ;)

Pour code touche : PRGM > 7
Citation : Pierre Dac
La mort n'est, en définitive, que le résultat d'un défaut d'éducation puisqu'elle est la conséquence d'un manque de savoir vivre.
 
Hors ligne w3b5t3r # Posté le 24/10/2008 à 21:40:45
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Danke schön =)

Vais surement avoir besoin encore de tes services, mais pas aujourd'hui car j'ai qu'un rendu sur bloc notes et il a du changer des caracteres qu'il savait pas recopier, donc j'ai pas le rendu de Ti-Graph qui marche pas sur mon PC pour x raison (ouuuh, x la variable qui fait tjs chier ^^)
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne myst6re # Posté le 25/10/2008 à 00:49:56
bip bip bip
Avatar
Groupe : Membres
Citation : Shaac
Y'a pas les accents sur ta calculatrice, tu remplace par une autre variable.


Si y'a des accents, d'ailleurs tu me fais penser qu'il faut que je vérifie si les caractères accentués peuvent être utilisés comme des var (mais j'en doute)

@tomtom91 :
Oui pas simple...
Text(1,1,1,2,3,4 affiche "1234"
Je ne sais pas si ça t'aide...
Édité le 02/11/2008 à 22:55:16 par myst6re
Image utilisateur

Un éditeur On-line de TI-Basic ? C'est possible ! TI-Editor !!
 
Hors ligne w3b5t3r # Posté le 25/10/2008 à 10:12:50
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Nouveau problème :

J'ai écrit :int ((rand50)->X

comment je trouve int et rand sur ma 82 stats fr ?
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne CyberTueur # Posté le 25/10/2008 à 13:22:46
ぼんくら
Avatar
Groupe : Membres
Dans le menu MATH (en dessous de alpha), sous-partie NUM et PRB ;)
Leurs noms doivent être quelque chose comme ent( et NbrAléat ^^

Mais "int(rand50)->X" équivaut à "entAléat(0,50)" ;)
Édité le 25/10/2008 à 13:23:55 par CyberTueur
70|_|7 |\|'357 (_,)|_|'!££|_|5!0|\|...
Comment bien commenter une news ?
 
Hors ligne w3b5t3r # Posté le 25/10/2008 à 13:24:12
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
thx =)
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne tomtom91 # Posté le 25/10/2008 à 18:39:05
...
Groupe : Membres
Citation : myst6re
<citation rid="3076775"><citation rid="3076204">

@tomtom91 :
Oui pas simple...
Text(1,1,1,2,3,4 affiche "1234"
Je ne sais pas si ça t'aide...


Euh bien, mais je ne vois pas comment tu stock la valeur d'un variable genre R dans une variable chaine :euh: car avec texte( : je pourrais a la rigueur mettre quelque chose du genre :
texte(1,1,chaine1
mais toujours pareil même cercle vicieux, je ne peut pas concaténer tout les chiffres que ma boucle trouve dans chaine1.
De plus texte( m'affiche un chiffre mais sur le graphe.


Je vous donne ici la boucle de mon programme permettant de transcrire un chiffre en base 10 en base que l'on veut.

Code : Pascal
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
While N>=B
N/B->D
partEnt(D)*B->E
N-E->R
If R=10
Disp "A"
If R=11
Disp "B"
If R=12
Disp "C"
If R=13
Disp "D"
If R=14
Disp "E"
If R=15
Disp "F"
If R<10
Disp R

partEnt(D)->N
End
Disp N

avec N le nombre en base 10 entré par l'utilisateur, B la base dans lequel on veut le chiffre.
Voila je rappelle je souhaite pouvoir afficher tout les chiffre d'un coup, or la vous l'avez compris il me les affiche un par un. :(
Édité le 25/10/2008 à 18:58:45 par tomtom91
Hors ligne rorkaii # Posté le 26/10/2008 à 11:16:26
Avatar
Groupe : Membres
Personne n'a une idée pour mon problème ?
Hors ligne nightmat # Posté le 26/10/2008 à 15:43:17
Kann ein Herz aus Stein sein ?
Avatar
Groupe : Membres
Tu veux un input en mode graphique ?
Tu dois le coder toi-même :p
Dommage parce qu'il est implémenté dans MirageOS, donc pas sur TI-83 !
Mais ne t'inquiete pas, ce n'est pas bien compliqué.

Pour sqroot tu as juste à l'appeller et ça te fait le calcul sur OP1.

Si tu as besoin de plus de précisions, fais le moi savoir, mais sachant que je retrouve internet dans une semaine.

Bonne continuation ;)
Tutoriel ASM pour TI (z80)
Prochain chapitre en cours d'édition : Les interactions
Chapitre sur les graphismes disponible !
 
Hors ligne myst6re # Posté le 26/10/2008 à 17:32:46
bip bip bip
Avatar
Groupe : Membres
@tomtom91 :
Tu as eu raison de me montrer la boucle, j'ai trouvé la solution...

Premier principe utilisé dans la solution :
Code : Autre
1
2
3
4

:"PREMIER->Str1
:"DEUXIEME->Str2
:"PREMIER"+"DEUXIEME"->Str3
:Disp Str3

Affiche :
Code : Autre
1

PREMIERDEUXIEME

C'est la concaténation que tu cherchais

Pour ton programme, il va falloir faire pour chaque tour de la boucle while :
Résultat+R->Résultat
puis à la fin afficher le Résultat.
Or il faut que R soit une chaine.

Deuxième principe utilisé dans la solution (ou comment transformer un chiffre en un texte)
Code : Autre
1

:sub("0123456789",R+1,1->Str1


Si R=1, la fonction va créer une sous-chaîne de la chaine "0123456789" à partir de la position R+1 (donc 2) et de longueur 1

Petit bonus (pour les A, B, C, D, E, F) :
Code : Autre
1

:sub("0123456789ABCDEF",R+1,1->Str1


Et voila !

Bon, maintenant voila ta nouvelle boucle :

Code : Autre
1
2
3
4
5
6
7
8
9
10

" "->Str2 //On est obligé d'initialiser Str2
While N>=B
N/B->D
partEnt(D)*B->E
N-E->R
sub("0123456789ABCDEF",R+1,1)->Str1
Str1+Str2->Str2
partEnt(D)->N
End
Pause sub(Str1,N+1,1)+Str2 \\Un pause pour que l'utilisateur puisse utiliser le scroll horizontal si le résultat est très long


On peut optimiser ce code un max aussi.

Image utilisateur

Un éditeur On-line de TI-Basic ? C'est possible ! TI-Editor !!
 
Hors ligne w3b5t3r # Posté le 26/10/2008 à 18:06:19
Ce qui ne tue pas fait mal...
Avatar
Groupe : Membres
Les boules, j'ai fini de recopier mais je peux pas diriger le serpent -_-'
Il n'existe pas de théorie de l'évolution, juste une liste d'éspèces que Chuck Norris autorise à survivre...
 
Hors ligne tomtom91 # Posté le 26/10/2008 à 18:52:24
...
Groupe : Membres
Ah oui merci myst6re, je suis bête j'avais fait le même genre de programme auparavant convertissant un nombre d'une base A en base 10, et la c'est le même principe.

Voici le programme pour ceux qui veulent :)

Code : Pascal
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Input "Nombre en base A :", Chaine1
longueur(Chaine1)->T
expr(Chaine1)->N
Input "Ce nombre est en quelle base ?",B
1->I
T-1->T
"0"->Chaine3
0->L
While T(différent)-1
sous-chaine(chaine1,I,1)->Chaine2
If Chaine2="A"
10->O
If Chaine2="B"
11->O
If Chaine2="C"
12->O
If Chaine2="D"
13->O
If Chaine2="E"
14->O
If Chaine2="F"
15->O
If Chaine2="1" ou Chaine2="2" ou Chaine2="3" ou Chaine2="4" ou Chaine2="5" ou Chaine2="6" ou Chaine2="7" ou Chaine2="8" ou Chaine2="9" ou Chaine2="0"
expr(Chaine2)->O
O*(B^T)->R
"R"->Chaine3
expr(Chaine3)->Q
L+Q->L
T-1->T
I+1->I
End
Disp L


Voila :p

Retour au forum "Autres langages" ou à la liste des forums

Vous devez être inscrit pour pouvoir poster des messages

Changer de design | En savoir plus | Plan du site | Politique d'accessibilité | Règles | RSS tutoriels | RSS news
Édité par Simple IT SARL : Nous contacter | Notre blog | Revue de presse | Publicité

Y'a plus rien à lire, faut remonter maintenant !

Hébergement web - Correction de tutoriels - Créer un site
Vous souhaitez apparaître ici ? Contactez-nous.

Nombre de connectés 269 Zéros connectés | Requêtes SQL 7 requêtes | Temps de génération de la page : Total (SQL) 0.0567s (0.0379s)