<![CDATA[Algorithmes]]>En cours, vous utilisez de nombreux algorithmes que vous pouvez insérer dans une calculatrice équipée d'une fonction "Programmes". Tous les algorithmes partagés par la communauté de Melinyel seront regroupés ici pour vous faciliter la recherche.

NOTE : Aide à la recherche

  • Les algorithmes sont classés par matière et sont ensuite classés par niveau croissant.
  • Le titre de l'algorithme indique son niveau, sa fonction et son créateur.
  • Dans un spoiler, vous trouverez plusieurs langages pour un même algorithme.

IMPORTANT : Pour partager votre algorithme avec nous, vous devez faire figurer le nom de votre calculatrice ainsi que le niveau et le chapitre associé au programme.

Mathématiques

  • [Terminale Spé. Maths - Divisibilité] Division Euclidienne  :

    Programmé en TI-Basic par [Vegnar42](<base_url>/profile/37-vegnar42/)

    // Initialisation des variables d'entrées

0 -> A

0 -> B

 

// Entrée des variables d'entrées

Disp "Entrez le dividende"

Input A

Disp "Entrez le diviseur"

Input B

 

// Phase de calcul

ent(A/B) -> C

A - (C*B ) -> D

 

// Affichage des résultats

Disp "Quotient", C

Disp "Reste", D

  • [Première - Second degré | Terminale - Nombres Complexes] Delta dans une fonction du 2nd degré  :

    Programmé en TI-Basic par [Vegnar42](<base_url>/profile/37-vegnar42/)

    // Initialisation des variables d'entrées

0 -> A

0 -> B

0 -> C

 

// Entrée des variables d'entrées

Disp "Entrez A"

Input A

Disp "Entrez B"

Input B

Disp "Entrez C"

Input C

 

// Phase de calcul

B² - 4*A*C -> D

 

// Détermination de x1 et x2 si le delta est positif

If (D > 0)

Then

(-B - sqrt(D)) / (2*A) -> U

(-B + sqrt(D))) / (2*A) -> V

 

// Détermination de x1 et x2 si le delta est négatif

Else

(D*(-1))*i² -> D

(-B - sqrt(D)) / (2*A) -> U

(-B + sqrt(D))) / (2*A) -> V

End

 

// Affichage des résultats

Disp "Delta vaut", D

Disp "x1 vaut", U

Disp "x2 vaut", V

Ce sujet sera complété au fur et à mesure que des membres posteront des algorithmes concernant les cours. Je compte sur vous pour partager vos connaissances 🙂

]]>http://new.melinyel.net/topic/197/algorithmesRSS for NodeThu, 21 May 2026 19:29:19 GMTMon, 17 Mar 2014 15:51:05 GMT60<![CDATA[Reply to Algorithmes on Tue, 08 Apr 2014 06:32:38 GMT]]>

Dans le post principal, il serait bon de mettre le type de calculette.

Dans les spoiler, il y a plusieurs langages pour un programme 😉

]]>http://new.melinyel.net/post/5074http://new.melinyel.net/post/5074Tue, 08 Apr 2014 06:32:38 GMT<![CDATA[Reply to Algorithmes on Mon, 07 Apr 2014 18:17:28 GMT]]>J'aurais bien mis mon programme "Devinez la taille de ma b..."  mais j'ai pas de cable pour relier ma TI 83 au PC

]]>http://new.melinyel.net/post/5048http://new.melinyel.net/post/5048Mon, 07 Apr 2014 18:17:28 GMT<![CDATA[Reply to Algorithmes on Mon, 07 Apr 2014 16:13:48 GMT]]>Dans le post principal, il serait bon de mettre le type de calculette.

Je viens d'acheter une calculette avec un autres langage de programmation, donc non compatible 😉

]]>http://new.melinyel.net/post/5026http://new.melinyel.net/post/5026Mon, 07 Apr 2014 16:13:48 GMT<![CDATA[Reply to Algorithmes on Sat, 05 Apr 2014 11:50:35 GMT]]>http://www.planet-casio.com/Fr/aide/tutorial-transfert-casio.php

J'ai fais un algo de calcul de mesures principales (Math - Première S) mais il y a des soucis d'affichage (Il ne met pas de fraction >< )

Fait sur une Casio 35+:

Lbl 0
? → A
If A>-1 And A<1
Then Locate 5, 4, "Deja mesure principale"
IfEnd
-------------- Notez que ça ne s'affichera pas, je n'arrive pas a mettre en pause le programme avec GetKey :s
If A>0
Then Int A → I
If Int(I/2) ≠ I/2
I+1→I
IfEnd
I+1→S
Locate 5, 5, I
Locate 9, 5,  "<"
Locate 10, 5, A
Locate 14, 5, "<"
Locate 15, 5, S
A-I→R
Locate 5, 6, "0<"
Locate 7, 6, R
Locate 10, 6, "< π"
Else
Int A→S
If Int(S/2) ≠ S/2
Then S+1→S
IfEnd
S-1→S
Locate 5, 5, I
Locate 9, 5, "<"
Locate 10, 5, A
Locate 14, 5, "<"
Locate 15 5, S
A-S→R
Locate 5, 6, "-π<"
Locate 8, 6, R
Locate 12, 6,  "<0"
IfEnd

Mais il est buggué je sais pas trop pourquoi, si qqun pouvait m'aider ça serait cool 😕

Il marche pas au niveau des negatifs

]]>http://new.melinyel.net/post/4724http://new.melinyel.net/post/4724Sat, 05 Apr 2014 11:50:35 GMT<![CDATA[Reply to Algorithmes on Wed, 19 Mar 2014 08:27:22 GMT]]>Est ce que quelqu'un sait comment transférer des programmes d'une casio vers un pc ?

]]>http://new.melinyel.net/post/2555http://new.melinyel.net/post/2555Wed, 19 Mar 2014 08:27:22 GMT<![CDATA[Reply to Algorithmes on Mon, 17 Mar 2014 16:20:37 GMT]]>Voici les algorithmes que j'ai créé pour me faciliter la tâche pendant les épreuves de maths/sciences ingénieur.

Tout ces algorithmes sont pour le modèle TI-82 de Texas Instruments. (Pour les non-initiés, les lignes commençant par "//" sont des commentaires, ne les mettez pas dans le programme)

Division Euclidienne (Niveau Terminale Spé. Maths (pas vraiment besoin d'être en terminale, mais ça aide dans ce chapitre) - Chapitre Divisibilité) :

// Initialisation des variables d'entrées

0 -> A

0 -> B

// Entrée des variables d'entrées

Disp "Entrez le dividende"

Input A

Disp "Entrez le diviseur"

Input B

// Phase de calcul

ent(A/B) -> C

A - (C*B ) -> D

// Affichage des résultats

Disp "Quotient", C

Disp "Reste", D

]]>http://new.melinyel.net/post/2253http://new.melinyel.net/post/2253Mon, 17 Mar 2014 16:20:37 GMT