Forum de Ti-Gen.org, le site francophone des TI

Bienvenue Invité ! Se connecter Mes sujets	Administrer
Utilisateurs actifs : Aucun membre + 1 visiteur

Avant de poster sur le forum, il y a des régles de bases à respecter pour une bonne entente et un respect de tous.
Veuillez lire la charte du forum.

:: Index » Forum TiZ80 » Programmation Ti-Basic » Fonctions de la Matrice (55 réponse(s))

./REPRISE DU POST PRECEDENT (post n°38) Marquer comme non lu.

RudyWI

Ecrit le: Samedi 12 juin 2004 à 18:34

Membre: Nouveau

Messages: 7

Membre n°292

Inscrit le 09 juin 2004

heuuuuuuu, j'ai un pb, ma Ti82 met une erreur à la ligne : If max(L1=B)

./Post n°39 Marquer comme non lu.

Kevin Kofler

Ecrit le: Samedi 12 juin 2004 à 19:00

Administrateur

Groupe: Staff de Ti-Gen

Messages: 4814

Membre n°40

Inscrit le 08 février 2004

max(L1)=B

Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!

./Post n°40 Marquer comme non lu.

mathiniste

Ecrit le: Samedi 12 juin 2004 à 19:01

Membre: Maître Ultime

Messages: 2057

Membre n°189

Inscrit le 12 avril 2004

j'espere queça va marcher, mais au fait pourquoi tu veux faire ce prog?

la mort n'a aucun rapport avec nous.Quand nous sommes vivants, la mort n'est pas là et quand elle est là, nous ne sommes plus...

./Post n°41 Marquer comme non lu.

verytourist

Ecrit le: Samedi 12 juin 2004 à 23:32

Membre: Titan

Messages: 973

Membre n°26

Inscrit le 02 février 2004

non, non, c'était bien max(L1=B), et chez moi sa marche très bien.
Car L1=B retourne une liste, et on cherche le maximum de cette liste
En fait, c'est équivalent a If max(L1=B)=1. Car si le maximum est de 1, max(L1=B) retourne 1 et donc c'est vrai, pas besoin de mettre égale.

./Post n°42 Marquer comme non lu.

verytourist

Ecrit le: Samedi 12 juin 2004 à 23:37

Membre: Titan

Messages: 973

Membre n°26

Inscrit le 02 février 2004

A toutes mes excuses, sur 82, L1=B produit une erreur, car je testai en fait sur ma 83..
Il va donc falloir passer par une double boucle...

./Post n°43 Marquer comme non lu.

mathiniste

Ecrit le: Dimanche 13 juin 2004 à 07:01

Membre: Maître Ultime

Messages: 2057

Membre n°189

Inscrit le 12 avril 2004

y'a pas un tuto pour 82 ici?

la mort n'a aucun rapport avec nous.Quand nous sommes vivants, la mort n'est pas là et quand elle est là, nous ne sommes plus...

./Post n°44 Marquer comme non lu.

bobti89

Ecrit le: Dimanche 13 juin 2004 à 21:40

Membre: Maître Ultime

Messages: 2494

Membre n°45

Inscrit le 09 février 2004

mathiniste, j'aime bien ton concours, et comme j'étais le premier a te critiquer :

lis()
Prgm
Local li,li1,b,nb
seq(x,x,1,100)->li1
seq(rand(100),x,1,10)->li
100->nb
For a,1,10
li1[nb-a+1]->li1[li[a]]
EndFor
EndPrgm

Et d'ailleurs ton code plante quand li,li1,b,nb existent et qsont archivées...

bob ou bob, vous ne voyez pas la différence. Pourtant il y en a une fondamentale, l'un est écrit à l'endroit, l'autre à l'envers.

Visitez mon site : http://www.bobti89.fr.st
Testez mon forum ici

./Post n°45 Marquer comme non lu.

matth

Ecrit le: Dimanche 13 juin 2004 à 22:20

Membre privilégié

Messages: 1329

Membre n°54

Inscrit le 16 février 2004

et je fait encore mieux :

lis()
Prgm
Local li,li1,b,nb
seq(x,x,1,100)->li1
seq(rand(100),x,1,10)->li
101->nb
For a,1,10
li1[nb-a]->li1[li[a]]
EndFor
EndPrgm

Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

http://www.informatiquefrance.com/stop-faute.jpg

./Post n°46 Marquer comme non lu.

mathiniste

Ecrit le: Lundi 14 juin 2004 à 18:21

Membre: Maître Ultime

Messages: 2057

Membre n°189

Inscrit le 12 avril 2004

> bobti89, pour le déplanter y'a juste à rajouter un unarchive
ces progs ne me convainquent pas bcp
Y'a d'autres volontaires?

la mort n'a aucun rapport avec nous.Quand nous sommes vivants, la mort n'est pas là et quand elle est là, nous ne sommes plus...

./Post n°47 Marquer comme non lu.

bobti89

Ecrit le: Lundi 14 juin 2004 à 21:14

Membre: Maître Ultime

Messages: 2494

Membre n°45

Inscrit le 09 février 2004

n'empêche qu'il est beaucoup plus cours et plus rapide

matth>Ah oui, bonne remarque

bob ou bob, vous ne voyez pas la différence. Pourtant il y en a une fondamentale, l'un est écrit à l'endroit, l'autre à l'envers.

Visitez mon site : http://www.bobti89.fr.st
Testez mon forum ici

./Post n°48 Marquer comme non lu.

mathiniste

Ecrit le: Mardi 15 juin 2004 à 19:00

Membre: Maître Ultime

Messages: 2057

Membre n°189

Inscrit le 12 avril 2004

d'ailleurs ce prog est codé pour ti68k, pa spour ti82, non?

la mort n'a aucun rapport avec nous.Quand nous sommes vivants, la mort n'est pas là et quand elle est là, nous ne sommes plus...

./Post n°49 Marquer comme non lu.

matth

Ecrit le: Mardi 15 juin 2004 à 19:28

Membre privilégié

Messages: 1329

Membre n°54

Inscrit le 16 février 2004

seq(x,x,1,100)->a
seq(rand(100),x,1,10)->b
101->c
For a,1,10
a[c-a]->a[b[a]]
End

aux erreur de parentaises près, voici le code pour TI82

Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

./Post n°50 Marquer comme non lu.

bobti89

Ecrit le: Mardi 15 juin 2004 à 20:20

Membre: Maître Ultime

Messages: 2494

Membre n°45

Inscrit le 09 février 2004

Sachant que tu peux même mettre :

seq(x,x,1,100)->a
seq(rand(100),x,1,10)->b
For a,1,10
a[101-a]->a[b[a]]
End

puisque c ne varie pas (j'avais pas vu

)

bob ou bob, vous ne voyez pas la différence. Pourtant il y en a une fondamentale, l'un est écrit à l'endroit, l'autre à l'envers.

Visitez mon site : http://www.bobti89.fr.st
Testez mon forum ici

./Post n°51 Marquer comme non lu.

matth

Ecrit le: Mardi 15 juin 2004 à 21:01

Membre privilégié

Messages: 1329

Membre n°54

Inscrit le 16 février 2004

seq(x,x,1,100)->L1
seq(rand(100),x,1,10)->L2
For a,1,10
L1[101-a]->L1[L2[a]]
End

en fait paske le nom des listes n'est pas libre
-Edité le Mardi 15 juin 2004 à 21:52 par matth-

Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

./Post n°52 Marquer comme non lu.

bobti89

Ecrit le: Mardi 15 juin 2004 à 21:51

Membre: Maître Ultime

Messages: 2494

Membre n°45

Inscrit le 09 février 2004

euh faut encore remplacer a[101-a]->L1[L2[a]] par L1[101-a]->L1[L2[a]],sinon bug assuré...

bob ou bob, vous ne voyez pas la différence. Pourtant il y en a une fondamentale, l'un est écrit à l'endroit, l'autre à l'envers.

Visitez mon site : http://www.bobti89.fr.st
Testez mon forum ici

./Post n°53 Marquer comme non lu.

matth

Ecrit le: Mardi 15 juin 2004 à 21:53

Membre privilégié

Messages: 1329

Membre n°54

Inscrit le 16 février 2004

post 51 édité

Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

./Post n°54 Marquer comme non lu.

mathiniste

Ecrit le: Mercredi 16 juin 2004 à 19:24

Membre: Maître Ultime

Messages: 2057

Membre n°189

Inscrit le 12 avril 2004

c'est déja mieux

la mort n'a aucun rapport avec nous.Quand nous sommes vivants, la mort n'est pas là et quand elle est là, nous ne sommes plus...

./Post n°55 Marquer comme non lu.

Invité

Ecrit le: Mardi 24 août 2004 à 20:30

10-> dim (l1)
for i, 1 , 10
int(rand*100)->l1(i)
end
voila pour les nombres aléatoires

for i,1,9
for j, i+1, 10
if (l1(ii)>l1(j))
then
l1(i)->a
l1(j)->l1(i)
a->l1(j)
end
end
end

voila pour la fonction de tri, c'est la plus performante que je connaisse, très rapide et pas trop de mémoire utilisée suplémentaire....

ensuite pour les afficher tu connais...