Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 981
Réponses : 4
Type : discussion
Etat : réponses autorisées

Algorthmique

-Coco- le 28/11/2009 à 19:04
Bon, voila je vois qu'il n'y en a pas, alors je sors mon premier programme ^^
Il permet de calculer par algorithme une racine carrée d'un nombre quelconque, avec toutes les précisions voulues (nbr d'itérations, etc...), mais il faut mettre les nombres qui encadrent...

Alors...

Code

0->T
Input "[Racine carrée de](?):",R
Input "A?:",A
Input "B?:",B
Input "10^(?):",P
Menu("FRAGMENTER?","OUI",O,"NON",N
Lbl O
While B-A>10^P
(A+B)/2->M
If M²<R
Then
M->A
Else
M->B
End
T+1->T
Disp "ITERATIONS:",T
Disp "A:",A
Disp "B:",B
Pause
End
Goto R
Lbl N
While B-A>10^P
(A+B)/2->M
If M²<R
Then
M->A
Else
M->B
End
T+1->T
End
Lbl R
Disp "FIN"
Disp "ITERATIONS :",T
Disp "A:",A
Disp "B:",B
Pause

Avec A nombre encadrant inférieur et B nombre encadrant supérieur, et P la précision (en puissance de 10 et doit être négatif)

Bon, certes il n'est pas parfait mais il marche, j'ai pas économisé d'octets ^^
(Il a vite été créé en cours de math pour "faciliter" le contrôle suivant godgrace.gif )
-Coco- le 28/11/2009 à 19:05
Bon, je pense pas qu'il soit utile a qui que ce soit, mais au moins j'aurais posté un programme xD
dysto le 29/11/2009 à 12:20
Il y a plein de programmes d'algorithmes si tu fouille le forum, c'est juste qu'ils traitent de sujets différents ^^.
-Coco- le 30/11/2009 à 17:45
Ah crazy.gif désolé j'avais pas vu ^^
Mais bon, j'essaie au moins de participer un peu a la vie active du forum (je posterai des jeux quand j'arriverai a en faire (déjà a moitié ^^) et quand ils présenteront un intérêt (ça, ça va être plus dur crazy.gif )
dysto le 30/11/2009 à 17:49
Citation
j'essaie au moins de participer un peu a la vie active du forum

Et c'est très bien, bravo !
Bonne chance pour ton jeu et si tu as un problème, n'hésites pas, on est tous la winkle.gif !