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
Spé Maths : racine évidente de Bézout
Auteur Message
Métalocif



Autorisation : Membre
Nb de messages : 92
Inscrit le : Lun 10 Mai 2010, 19:24
Posté le : Sam 07 Jan 2012, 22:16   Citer 

Bon, le titre n'est peut-être pas clair : ce programme trouve un couple racine évidente d'une équation du type : ax+by=z .
Par exemple, pour 13x+84y=7 , il renvoie {7;-1}.
Voilà le code:


Code
ClrHome
Prompt A,B
Input "AX+BY=?",Z
DelVar X
DelVar Y
While AX+BY/=/Z
If X<0
-X->X
If Y<0
-Y->Y
If AX<=BY
X+1->X
If AX-BY=Z
-Y->Y
If BY-AX=Z
-X->X
If BY<=AX
Y+1->Y
If AX-BY=Z
-Y->Y
If BY-AX=Z
-X->X
End
ClrHome
Output(1,1,"LE COUPLE:
X=
Y=
EST UNE SOLUTION
EVIDENTE DE L'EQUATION.

PAR ALEX
Output(2,3,X
Output(3,3,Y



/=/ est le signe "différent de".
<= est le signe "inférieur ou égal à".

Bon, si vous n'êtes pas en TS, Spé Maths, ce programme sera parfaitement inutile. Si c'est le cas, testez le !

Métalocif

----------------------
&quot;On ne ment jamais autant qu'avant les élections, pendant la guerre et après la chasse.&quot; Clémenceau
 Adresse email Haut de page Bas de page 
 
azerty1



Autorisation : Membre
Nb de messages : 468
Inscrit le : Dim 12 Déc 2010, 20:44
Posté le : Sam 07 Jan 2012, 22:40   Citer 

Je ne suis pas en term', et je n'ai regardé que vaguement ton prog,mais se n'est pas un peu long de tester tout les entiers? (si j'ai bien compris)

----------------------
Ti-Connect 64bits
PROTECT
Tuto Skin Perso Wabbitemu
 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3772
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 08 Jan 2012, 23:00   Citer 

Ce programme m'a tout l'air d'un crible bien que je ne comprenne pas tout...
Si ça fonctionne c'est déjà ça. bigmouth.gif

ax+by=z est un problème de Diophante qui est prouvé comme soluble grâce au théorème de Bézout.
Nuance tongue.gif


Je préfère largement utiliser un des algorithmes à notre disposition.
J'en connais deux et j'ai utilisé celui de mon cours.
Celui de mon cours ne gère pas naturellement les négatifs. J'ai ajoûté quelques tests dans le prog.
Le miens (version 4) : http://www.mediafire.com/download.php?2ia4x58nem05bk6

EDIT decembre 2014 : une meilleure version de mon bezout (version 5).

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
calcugeek



Autorisation : Membre
Nb de messages : 72
Inscrit le : Jeu 26 Mai 2011, 16:41
Posté le : Lun 09 Jan 2012, 12:53   Citer 

Salut metalocif. ton programme est en effet "très" long.
Voici le mien que j'avais posté l'année dernière quand j'avais la joie d'être en classe de siest... EUH de terminale godgrace.gif
tu m'en diras des nouvelles beer.gif beer.gif beer.gif
http://tout82.free.fr/forum/sujet.php?sujet=2627

----------------------
En école d'ingénieurs depuis cette année.
Continue de programmer sur ma ti malgré les 3 tonnes quotidiennes de devoirs ^^
Fan de metallica et de tous autres groupes sachant jouer du vrai métal. (yeah!!!)
 Adresse email Haut de page Bas de page 
 
Métalocif



Autorisation : Membre
Nb de messages : 92
Inscrit le : Lun 10 Mai 2010, 19:24
Posté le : Jeu 12 Jan 2012, 18:57   Citer 

Oui, les cours de maths avec Sat... Mlle Honoré s'apparentent à un coma profond... mis à part qu'elle note si sec qu'elle est interdite de corriger les copies du Bac...
Pour ton programme, il est en effet bien plus "malin" que le mien. J'y penserai!

Métalocif

----------------------
&quot;On ne ment jamais autant qu'avant les élections, pendant la guerre et après la chasse.&quot; Clémenceau
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2018 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