Gamme TI-82
Partager sur Facebook Fil RSS Imprimer la page
Cacher les résultats

Résultat de la recherche



Poster un nouveau sujet Poster une réponse <<   Page: , , 3,      >>
Amateurs de rubick's cube et de casse tête,pour vous.
Auteur Message
Didouille
Avatar

Autorisation : Membre
Nb de messages : 159
Inscrit le : Dim 11 Oct 2009, 14:18
Posté le : Jeu 04 Fév 2010, 16:36   Citer 

Oui t'abuse un peu monstercrunch. Ta déjà un sujet sur ton chat il me semble.

----------------------
--Didouille--
 Adresse email Haut de page Bas de page 
 
Rézus
Avatar

Autorisation : Membre
Nb de messages : 861
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Jeu 04 Fév 2010, 19:46   Citer 

Pour l'amélioration on peut faire plus simple,suffit de mettre chaque lettre à un emplacement au hazard puis c'est bon,seul petit problème,le carré est-il faisable dans toutes les positions, ? à mon avis oui,mais on sait jamais, donc cher --coco--
Je te lances un petit défi que tu vas aimer:trouver si il y a une solution pour toutes les positions. godgrace.gif

 Adresse email Haut de page Bas de page 
 
sypotu
Avatar

Autorisation : Membre
Nb de messages : 660
Inscrit le : Dim 13 Sep 2009, 8:27
Posté le : Jeu 04 Fév 2010, 20:13   Citer 

moi je ne pense pas...
mais je laisse à coco le plaisir de nous le démontrer ! winkle.gif

----------------------
Ti-83+.fr
Passe en 1ère S


Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Chat du site_________________Hebergeur pour vos .83p
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 04 Fév 2010, 22:13   Citer 

Et bien, la réponse est...
Peut etre ^^




Et bien oui, il y a une solution dans toutes les positions ^^
dumoins dans le rubik's cube...
et je ne vois pas ce qui pourrait bloquer, var on peut atteidre toutes les positions en le faisant bouger soi même (si si, je vous assure ^^)
enfin, la théorie est peut etre différente de la pratique... peut être me trompe-je...

Mais la meilleure solution c'est d'essayer ^^
Je ne pense pas que ça soit insurmontable à faire ^^

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Didouille
Avatar

Autorisation : Membre
Nb de messages : 159
Inscrit le : Dim 11 Oct 2009, 14:18
Posté le : Jeu 04 Fév 2010, 22:14   Citer 

Nan c'est pas possible. Moi aussi j'ai fait du rubik's cube et je crois me souvenir qu'il y a seulement 1 chance sur 16 que le cube soit bon après l'avoir mélangé n'importe comment. Sa arrive par exemple lorsque que quelqu'un démonte un rubik's cube et remet les faces au hasard.

Et non tout les mouvements ne sont pas possible. On ne peut pas par exemple faire pivoter un coin tout seul sans changer quelque chose sur le cube.

----------------------
--Didouille--
 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 04 Fév 2010, 22:16   Citer 

J'ai tenté d'en faire un (de mélange automatique)
ça mélangeait bien dans la matrice, avec tous les nombre qu'il faut,
mais ça n'apparaissait quand les lettres apparaissaient...
Je n'ai pas trouvé ce qui clochait, mais comme je n'ai pas créé le prog moi même je ne le connais pas tres bien...

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 04 Fév 2010, 22:17   Citer 

Sur une petite plateforme 2D en 3x3 c'est possible ^^ (ou 4x4 ou 5x5, mais tant que c'est dans le premier principe instauré par Rézus ça marche ^^)

Et le Rubik's cube il est possible dans toutes les 40 millions de combinaisons possibles, sans avoir recours a la force ^^ un peu de technique s'impose

 Adresse email Haut de page Bas de page 
 
Didouille
Avatar

Autorisation : Membre
Nb de messages : 159
Inscrit le : Dim 11 Oct 2009, 14:18
Posté le : Jeu 04 Fév 2010, 22:18   Citer 

Je suis sûr à 100% que se n'est pas possible. ( mon record est de 1 minute 30)

----------------------
--Didouille--
 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 04 Fév 2010, 22:21   Citer 

Ben, pourquoi ça ne serait pas possible???
Moi je suis sur a 95% que c'est possible (reste 5% de doute)
pis tant que tu ne teste pas...


Sinon moi pour tout avouer, le rubik's cube je le fais couronne par couronne, j'arrive a faire les 2 premieres couronnes et 1 face assez facilement (45 secondes mon record ^^') mais pour ce qui est de la derniere face je galere un peu plus, et la j'ai souvent recours à la petite méthode de résolution ^^

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 04 Fév 2010, 22:25   Citer 

Bon je calculerai et ferais une théorie demain en cours de physique...
Un petit algorithme de résolution ^^
je tenterai un max de positions et je verrai si l'on peut toutes les faire et après on verra loupe.gif extraterre.gif

 Adresse email Haut de page Bas de page 
 
Didouille
Avatar

Autorisation : Membre
Nb de messages : 159
Inscrit le : Dim 11 Oct 2009, 14:18
Posté le : Jeu 04 Fév 2010, 22:33   Citer 

As-tu déja démonter ton cube ? Et le remonter au hasard ?
Sinon voici une source :
http://www.francocube.com/cyril/plus.php#n6

Et une autre encore mieux avec la démonstration mathématiques:
http://trucsmaths.free.fr/rubik.htm#impossible

Je m'étais juste trompé sur le taux de chance d'avoir un cube impossible, c'est 1/12.

----------------------
--Didouille--
 Adresse email Haut de page Bas de page 
 
sypotu
Avatar

Autorisation : Membre
Nb de messages : 660
Inscrit le : Dim 13 Sep 2009, 8:27
Posté le : Jeu 04 Fév 2010, 22:39   Citer 

moi je suis d'accord avec didouille
même si je ne suis pas un expert du rubik's cube (record : 5min ^^) il me semble avoir entendu que toutes les positions n'étaient pas résolvables

----------------------
Ti-83+.fr
Passe en 1ère S


Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Chat du site_________________Hebergeur pour vos .83p
 Adresse email Haut de page Bas de page 
 
Rézus
Avatar

Autorisation : Membre
Nb de messages : 861
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Ven 05 Fév 2010, 18:53   Citer 

Vous avez oublié qu'il ne s'agit pas d'un rubick's cube ^^.
Ici la calto ne peut pas inverser ou retourner les coins,d'ailleurs je donnes ma 82 stat.fr à celui qui arrivera a me faire une combinaison avec mon programme qui inversera le sens d'une lettre.Un A sur à l'envers par exemple.
Je pourrais tenter un calcul de probabilités,mais j'ai la flemme et je pense que c'est pas la peine.
Le mieux c'est d'essayer.Coco,tu peux poster le code de ton mélangeur automatique ste plait ?

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Dim 07 Fév 2010, 19:27   Citer 

Désolé, je l'ai supprimé il y a longtemps déja ^^

Mais c'était un truc du genre...


Code

// petite présentation avec barre de chargement etc
:A²->I
:For(F,1,I
:Lbl 55
:EntAleat(1,A)->K
:EntAleat(1,A)->L
:If [A](K,L):Goto 55
:F->[A](K,L)
:End



Voilà c'est plutot simple mais ça ne met les valeurs que dans la matrice et lors de l'affichage ça reste par défaut...

Bon, si vous pouvez tirer quelque chose de ça c'est cool ^^

 Adresse email Haut de page Bas de page 
 
Rézus
Avatar

Autorisation : Membre
Nb de messages : 861
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Lun 08 Fév 2010, 13:38   Citer 

Merci,ça devrait aller,je vais y travailler.

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Mar 09 Fév 2010, 12:06   Citer 

oki bon courage ^^

 Adresse email Haut de page Bas de page 
 
Rézus
Avatar

Autorisation : Membre
Nb de messages : 861
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Mar 09 Fév 2010, 19:58   Citer 

:SauveBDG 0
:EffVar Chaine1
:EffVar [A]
:EffDessin:CoordRect:QuadOff:AxesOff
:0->Xmin:94->Xmax:0->Ymax:-62->Ymin
:"ABCDEFGHIJKLMNOPQRSTUVWXY"->Chaine1
:Lbl A
:EffEcr
:EffDessin
:Menu("-----RUBICK-----","3*3",1,"4*4",2,"5*5",3,"QUITTER",Q
:Lbl 1
:3->A:2->F:4->G
:Goto B
:Lbl 2
:4->A:1->F:4->G
:Goto B
:Lbl 3
:5->A:1->F:3->G
:Lbl B
:Output(1,1,"RUBICK:PAR REZUS
:Output(2,1,"----------------
:Output(5,4,"CHARGEMENT
:Output(6,1,"----------------
:Output(8,1,"----------------
:For(C,1,16
:Output(7,C,"=
:End
:{A,A}->dim([A]
:Output(7,1,"OOOOOOOOOOOOOOOO
:1->¤
:For(C,0,A-1
:For(Z,1,A
:¤->[A](C+1,Z
angry.gif-31.5+7A/2-7C)->E
:If A=4
angry.gif-31+7A/2-7C)->E
:42.5-7A/2+7Z->D
:If A=4
:42-7A/2+7Z->D
:sous-Chaine(Chaine1,¤,1->Chaine2
:Texte(E,D,sous-Chaine(Chaine1,¤,1
:¤+1->¤
:End
:End
bigmouth.gif-7Z+14->D
:0->I:0->J:0->¤:0->P:0->T:0->Z
:Lbl C
:If ¤=2
:T+Z->T
:If ¤=1
:2->¤
:Texte(-J,I,"
bigmouth.gif->X:-E-7->Y
:Lbl C¤
:For(C,0,9E99
:X->I:Y->J
:codeTouch->K
:X-7(K=24)+7(K=26->X
:X+7A(X<D)-7A(X>D+7A-7->X
:Texte(-J,I," 3 espaces
:Texte(-Y,X,"^
:If K=25
:Goto C1
:If K=34
:Goto C2
:If K=21
:Goto D
:If K=11
:1->¤
:If K=105
:Goto E
:If ¤=1
:Goto C
:End
:Lbl C1
:If ¤=2
:T+Z->T
:If ¤=2
tongue.gif+1->P
:[A](1,partEnt(X/7-G->N
:For(Z,2,A
:[A](Z,partEnt(X/7-G->[A](Z-1,partEnt(X/7-G
:Texte(-Y+7Z-7A-14,X,sous-Chaine(Chaine1,[A](Z,partEnt(X/7-G)),1
:End
:N->[A](A,partEnt(X/7-G
:Texte(-Y-7,X,sous-Chaine(Chaine1,[A](A,partEnt(X/7-G)),1
:Goto C¤
:Lbl C2
:If ¤=2
:T+Z->T
:If ¤=2
tongue.gif+1->P
:[A](A,partEnt(X/7-G->N
:For(Z,A-1,1,-1
:[A](Z,partEnt(X/7-G->[A](Z+1,partEnt(X/7-G
:Texte(-Y-7A+7Z,X,sous-Chaine(Chaine1,[A](Z,partEnt(X/7-G)),1
:End
:N->[A](1,partEnt(X/7-G
:Texte(-Y-7A,X,sous-Chaine(Chaine1,[A](1,partEnt(X/7-G)),1
:Goto C¤
:Lbl D
:If ¤=2
:T+Z->T
:If ¤=1
:2->¤
:Texte(-J,I,"
:-E+7A-7->Ybigmouth.gif-7->X
:Lbl D¤
:For(C,0,9E99
:X->I:Y->J
:codeTouch->K
:Y-7(K=34)+7(K=25->Y
:Y-7A(Y>-E+7A-7)+7A(Y<-E->Y
:Texte(-J,I," 3 espaces
:Texte(-Y,X,">
:If K=24
:Goto D1
:If K=26
:Goto D2
:If K=21
:Goto C
:If K=11
:1->¤
:If K=105
:Goto E
:If ¤=1
:Goto D
:End
:Lbl D1
:If ¤=2
:T+Z->T
:If ¤=2
tongue.gif+1->P
:[A](partEnt(-Y/7)-F,1->N
:For(Z,2,A
:[A](partEnt(-Y/7)-F,Z->[A](partEnt(-Y/7)-F,Z-1
:Texte(-Y,X+7Z-7,sous-Chaine(Chaine1,[A](partEnt(-Y/7)-F,Z-1),1
:End
:N->[A](partEnt(-Y/7)-F,A
:Texte(-Y,X+7A,sous-Chaine(Chaine1,[A](partEnt(-Y/7)-F,A),1
:Goto D¤
:Lbl D2
:If ¤=2
:T+Z->T
:If ¤=2
tongue.gif+1->P
:[A](partEnt(-Y/7)-F,A->N
:For(Z,A-1,1,-1
:[A](partEnt(-Y/7)-F,Z->[A](partEnt(-Y/7)-F,Z+1
:Texte(-Y,X+7Z+7,sous-Chaine(Chaine1,[A](partEnt(-Y/7)-F,Z),1
:End
:N->[A](partEnt(-Y/7)-F,1
:Texte(-Y,X+7,sous-Chaine(Chaine1,[A](partEnt(-Y/7)-F,1),1
:Goto D¤
:Lbl E

:If ¤ø2
:Goto A
:EffEcr
:Output(1,1,"RUBICK:PAR REZUS
:Output(2,1,"----------------
:Output(3,5,"RESULATS
:Output(4,1,"----------------
:Output(5,6,"TEMPS:
:Output(6,1,T
:Output(7,6,"COUPS:
:Output(8,1,P
:Pause
:Goto A
:Lbl Q
:EffDessin
:EffEcr
:RappelBDG 0
:EffVar [A]
:EffVar BDG0
:EffVar Chaine1
:Output(1,1,"

Voilà.Vous rajoutez ça entre les deux lignes en bleu:

Code
:Lbl W
:Texte(1,29,"PATIENTEZ
:For(C,1,A
:For(Z,1,A
:0->[A](C,Z
:End
:End
:For(C,1,A^2
:Lbl 55
:entAléat(1,A->K
:entAléat(1,A->L
:Goto 55
:C->[A](K,L
:End
:For(C,0,A-1
:For(Z,1,A
:[A]C+1,Z->¤
:-(-31.5+7A/2-7C)->E
:If A=4
:-(-31+7A/2-7C)->E
:42.5-7A/2+7Z->D
:If A=4
:42-7A/2+7Z->D
:sous-Chaîne(Chaîne1,¤,1->Chaîne2
:Texte(E,D,sous-Chaîne(Chaîne1,¤,1
:End
:End
:D-7Z+14->D
:0->I:0->J:0->¤:0->P:0->T:0->Z
:Texte(1,29,"[38 espaces]
:Goto C



Et "If K=15:Goto W" juste derrière la ligne en vert,et vous obtenez La version 2.0 de mon prog,avec un mélangeur.
Pour mélanger le carré faut appuyer sur [graphe] pendant le jeu.
Sur ma calto ça marche nickel,donc si y a des erreurs c'est des erreurs de recopiage.

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 11 Fév 2010, 20:51   Citer 

oki je vais tenter ça merci et bravo!

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 11 Fév 2010, 20:55   Citer 

t'aurais pu économiser quelques octets en remplaçant
:For(C,1,A
:For(Z,1,A
:0->[A](C,Z
:End
:End

par
:Remplir(0,[A]

mais c'est pas grave ça marche quand même ^^

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Jeu 11 Fév 2010, 21:02   Citer 


Citer : Rézus
:SauveBDG 0
Voilà.Vous rajoutez ça entre les deux lignes en bleu:

Code
:Lbl W
:Texte(1,29,"PATIENTEZ
:For(C,1,A
:For(Z,1,A
:0->[A](C,Z
:End
:End
:For(C,1,A^2
:Lbl 55
:entAléat(1,A->K
:entAléat(1,A->L
:Goto 55               <== ici!
:C->[A](K,L
:End
:For(C,0,A-1
:For(Z,1,A
:[A]C+1,Z->¤
:-(-31.5+7A/2-7C)->E
:If A=4
:-(-31+7A/2-7C)->E
:42.5-7A/2+7Z->D
:If A=4
:42-7A/2+7Z->D
:sous-Chaîne(Chaîne1,¤,1->Chaîne2
:Texte(E,D,sous-Chaîne(Chaîne1,¤,1
:End
:End
:D-7Z+14->D
:0->I:0->J:0->¤:0->P:0->T:0->Z
:Texte(1,29,"[38 espaces]
:Goto C



Et "If K=15:Goto W" juste derrière la ligne en vert,et vous obtenez La version 2.0 de mon prog,avec un mélangeur.
Pour mélanger le carré faut appuyer sur [graphe] pendant le jeu.
Sur ma calto ça marche nickel,donc si y a des erreurs c'est des erreurs de recopiage.



attention! j'ai vu une atroce erreur crazy.gif
le Goto 55 si tu le mets tout seul comme ça ça va faire une belle boucle infinie ^^

il faut donc rajouter

:If [A](K,L

:Goto 55

Voilà a part ça ça devrait aller ^^

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse <<   Page: , , 3,      >>





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2016 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink
 

Site hébergé par Free Page sous licence creative commons Page validée par le W3C (XHTML 1.0 Transitional) Feuille de style validée par le W3C Flux RSS 2.0 valide Page étiquetée par l'ICRA Page testée par Ocawa