Salut,

J'ai l'impression de me répéter (cf. le PGCD )...

1) Programme en complément de la commande gcd() des calculatrices. Il permet de calculer le PGCD de deux nombres en appliquant l'algorithme d'Euclide (et en l'affichant !), afin de pouvoir contrer la ruse des profs qui consiste à demander de ne pas donner le PGCD directement, mais d'écrire les calculs intermédiaires (enfin, du moins en 2nd)...

2) C'est en Ti-Basic. Testé sur Ti-83+, mais ça doit bien marcher sur les autres...

_{C'est justement toi qui m'a donnée l'idée de créer ce topic: j'ai pensé que ça pourrait etre sympa, j'ai rentré ton programme dans ma TI83+.}

Un deuxième pour la route (en physique, cette fois)...

1) Il permet de calculer les angles d'incidence/réfraction à l'aide des formules de Descartes et de calculer la vitesse de la lumière dans un milieu d'indice n.

2) Là encore, je l'ai codé sur ma Ti-83+, mais ça doit marché sur d'autres...

bonjour

Dans ce cas, si ça correspond à la ligne édito du site, il serait bien de demander à T_P un forum programmes sur le site ( au niveau le plus haut ) ainsi que des sous-forum spécifiques TI-Basic, VBA, Pascal...

Ainsi vous pourriez retrouver plus facilement vos petits...

Maintenant, je ne sais pas ce qu'en pense les gestionnaires de l'...ni les autres mathîliens ?

(j'ai peur que l'île de maths puisse diverger, mais peut-être me trompé-je ? )

Salut mikayaou

ça serait peut etre pas mal, il faudrait que _P passe par là mais pour l'instant, restons en à un topic avant de passer au forum, c'est plus raisonnable.

Ce qui est bien, c'est cette notion de mise en accessibilité de programmes destinés aux maths : ce qui rentre parfaitement dans le thème de l'île

Maintenant, je me demande s'il n'y a pas des sites spécifiques, dédiées aux calculettes, qui répondent à ce besoin ?

Avez-vous été fouiner sur les sites dédiés à vos machines ?

Salut,

Sympa ce topic

Programme:INVERSUM
Utilité:Mathématique() :Sert à visualiser et donc à conjecturer la convergence d'une somme "infinie" connue

Par exemple:

Citation :
Horizontal

Oups, j'ai oublié de dire qu'il était pour TI-82stats,Ti-83+ (il doit surement marcher sur TI-82 )

Edit bis( ) on peut commencer la premiére somme à k=0 car par convention 0!=1

Pas mal vos programmes tous les deux! Personne a d'autres choses à proposer, je pensais qu'en Term S spé maths, les élèves utilisaient souvent des programmes pour faciliter leurs recherches dans les exo.

alors proposer...

fakir151

oui j'ai des programmes qui pourraient interesser les futurs spé maths

je fignole "DIOPHANTE" (résolution d'équation diophantienne) et vous le poste + en cadeau un programme de décomposition d'un nombre en facteurs premiers (version beta)

mais je vous poste ça un peu plus tard

quand je dis équation diophantienne je veux dire ax+by=c  hein simon

ok pas de probleme!

Bonjour à tous !

Voici un programme simple en Casio pour déterminer les coordonnées de l'image (x';y') d'un point(x;y) par la réflexion d'un droite(y=ax+b) :

salut Sympa ce topic !

Alors voici les programmes que je propose : (moi c'est sur ma TI-83 après je sais pas sur les autres si ça marche... )

- Pour résoudre des systèmes d'équation simples du second degré.

Citation :

Prompt A,B,C
B²-4*A*C->D
Disp "D=",D
If D<0
Then
Disp "PAS DE SOL"
Else
If D>0
Then
(-b-(D))/(2*A)->F
(-B+(D))/(2*A)->G
Disp "X1=",F
Disp "X2=",G
Else
Disp "X=",-B/(2*A)
End
End

ce n'est pas pour les systeme mais seulement pour une équation du second degré. Sinon merci de votre participation

matovitch>>> excuse moi mais c'est quoi la primalité? et à quoi servent tes autres programmes que tu as la flemme d'écrire??

fakir151

Bonjour !
Les grands mots "test de primalité" veulent dire teste si un nombre est premier.
J'ai un programme (long), qui permet de transcrire de base 1 à 36 à une autre base de 1 à 36 (26 lettres dans l'alphabet).
Et puis j'avais plein de programme, mais je suis aller voir la ram(et la rom) de ma calculatrice, ce qui a effacé la mémoire.J'aivais sur les barycentre, et un énorme pregramme qui simplifiait les équation logiques sous forme de somme de produit.

Oui pardon, je me suis trompé c'est sur les équations du second degré pour le programme des systèmes c'est celui-ci : (convient normalement à toutes les texas)

Citation :

Prompt A,B,C,D,E,F
A*D-B*C->K
If K0
Then
(D*E-B*F)/K->X
(A*F-C*E)/K->Y
Disp X Frac
Disp Y Frac
Else
Disp "NON UNIQUE SOL"
End

Citation :

Prompt N
For(D,1,(N),1)
If fPart(N/D)=0
Pause {D,N/D}
End

ok merci de tes précisions, et sinon ton test de primalité, serais tu capable de me le donner pour ma TI83+ stp?

si vous voulez j'ai un programme "crash"

fakir, t'inquiéte pas tu l'aura d'ici une heure top chronos (j'suis un peu occupé :s)

Bonjour

Une astuce pour résoudre des sytèmes

Résolution d'un système à la calculette

J'ai plein de programmes, mais assez longs ^^

Non, désolé, je ne connais pas du tout ce langage.

merci mais c'est quoi crash ?

sinon dydy a quoi sert exactement ton programme diviseur car je ne comprends pas la ligne For(...)

Je pense que la résolution de système est integré à toutes les calculatrice non? (souvent sous forme de matrice).

pas grave motovitch

_matovitch*

Après j'en ai un sur les coordonnées polaires en trigo :

Citation :

Prompt X,Y
R Pr(X,Y)->R
R Pr(X,Y)->
ClrHome
Disp 'RAYON R,ANGLE "
Disp R,
Disp R,
Disp "FRACTION /"
Disp /Frac

pardon erreur, pour celui sur les coordonnées polaire à la 3ème ligne c'est :

Citation :
R P(X,Y)->

_{oui mais à quoi sert il exactement, je n'ai pas encore vu les coordonnés polaires?}

En fait c'est pour la trigonométrie, tu le verras en première c'est pour "convertir" des coordonnées du plan en coordonnées polaire c'est à dire dans le cercle, il y a des formule pour calculer ça, c'est tout simple. Les coordonnées d'un point dans un cercle c'est les coordonnées polaires...

Salut a tous

Sympa ce topic ! Comme gui_tou j'ai des programme assez long et ca rejoind ceux de matovich (notament sur les conversions de bases)
Sinon je peut en mettre un tout bête écrit en 5 minute mais super utile, surtout pour ceux comme moi qui on la TI-82 qui qui ne possèdent pas de fonction qui simplifie les fractions (ou pas directement).

Oups pardon...de toute manière j'ai pas encore vu.

désolé pour hier

Programme: DECOMPO
Utilité: Décomposition en facteurs premiers d'un nombre, Primalité d'un nombre
TI-82 Stats +

Citation :
ClrHome
Prompt N
N->A
2->N
While fPart(A/N)=0
Disp "", N
Pause
A/N->A
End
3->N
While fPart(A/N)=0
Disp "", N
Pause
A/N->A
End
5->N
While N
While fPart(A/N)=0
Disp "", N
Pause
A/N->A
End
N+2->N
End
If A1
Then
Disp "",A
End
Disp "FIN"

Ah tiens si vous voulez j'ai mon tout premier programme ( niais  je reconnais mais c'était le premier ) une balle qui rebondit de manière aléatoire sur les parois de l'écran de la calculatrice et qui laisse sa trace derriére ^^

tu peux toujours montrer pour qu'on rigole

Grr PE les lbl ... des fausses boucles!

OK!

Citation :
ClrDraw
0->Ymin
0->Xmin
62->Ymax
94->Xmax
1->A
1->B
1->D
1->K
While 0=0
A+K->A
B+D->B
Pt-On(A,B)
If B62
randInt(-5,-1)->D
If A94
randInt(-5,-1)->K
If B1
randInt(1,5)->D
If A1
abs(K)->K
For(T,1,20)
End
End

Qui utilise les lbl !
Petite optimisation pour Epicurien : enregistre VA dans une variable, car la boucle fait le calcul à chaque fois.
Sinon, j'avais fait un sokoban avec éditeur et 255 niveau sur 35+, exellent !
Je lance un défi : un +ou- avec un minimum de place je m'y met !

Oups précisions : nombre à trouver de 1 à 100 et compte le nombres de coups en l'affichant à la fin.

kézako sokoban?

Cherche sur google.C'est assez marrant.Un petit bonhomme qui doit pousser des caisses, mais ce n'est pas si simple !

Programme: +OU-
Utilité: Trouvez le nombre de 1 à 100, comptage du nombre de coup et effacement de l'écran au départ !
Casio 35+
Taille : 66 octets

Citation :
0 -> C
Clrtext
Int 99 rand# + 1 -> N
Do
Isz C
? -> A
A > N => "-" (disp)
A < N => "+" (disp)
LoopWhile A N
C

Mouais , c'est surtout pour les noobz ( pas si dur d'utilier des boucles et des tests logiques ..)

Ah oui , si c'est j'me souviens en avoir fait un de 10 niveaux lol mais tu l'as fait comment toi ton truc? moi c'est avec les matrices qui me servaient "de grilles" pas toi (un peu comme tetris v1.0 by Kuid312) ?

Je trouve ça plus pratique quand même ; en plus, ça permet de mieux s'y retrouver dans le programme : on retrouve plus facilement un Lbl qu'un if parmi tant d'autres...