Voilà j'ouvre ce topic pour faire echo au précédent concernant la cryptologie afin de présenter ses fonctions en C personnelles (et j'insiste sur le personnelle car la plupart existent déjà) concernant les maths.

Quelle intérêt ? En recréant les fonctions cela montre que l'on maitrise parfaitement celle-ci à la fois pour les maths et pour la programmation.

Donc je remets ma fonction PGDC et PPCM

on met nos fonctions personnelles ?

oui je crois bien que c'est ce qu'il a voulu dire

il me semble que j'avais posté un message disant :

je crois que je ne sais plus programmer en C !

en tout cas, je vais essayer, corrigez-moi si je me trompe :

la factorielle :




    
edit de Guill@ume pour les balises [code]

voilà, des erreurs ?

Oui tu as oublié le return a;

Enfin sinon ça va

ok, modifié

Nan le return ne doit pas être dans le for, je te modifie ça

J'ai aussi ajouter un <= car 5! = 1*2*3*4*5 donc le 5 compte bien !

aaaaah, grosse erreur qui pourrait faire planter ! merci

Ouais... j'ai déjà vu beaucoup plus intéressant comme fonction ! De plus ta fonction ne tient pas compte du cas où le nombre = 0.
Je ne suis pas contre ce sujet, même si je ne vois pas vraiment son utilité mais essayez au moins de mettre des fonctions personnelles ET intéressantes...

j'ai la fonction somme de termes ( avec Σ ) et produit de facteurs ( Π ) mais c'est en TI-BASIC ( donc c'est plutôt un programme et pas une fonction ) et je doute que beaucoup de personnes comprennent le code

edit : je peux quand-même essayer, ce sera commenté :


PROGRAM:SIGMA1              // nom du programme ( SIGMA1 )

:Disp "I MIN ?"                // affiche I MIN ?
:Input "",I                 // demande à entrer une valeur qui sera enregistrée dans la variable I
:Disp "I MAX ?"
:Input "",J
:Disp "CALCUL ?"
:Input "",Str0             // là, la variable est une chaîne de caractères
:StringEqu(Str0,Y₀)          // on enregistre Str0 dans la fonction Y₀
:0->W                     // enregistre 0 dans la variable W
:For(X,I,J)               // la variable X va aller de I à J avec un pas de 1
:Y₀+W->W       // Y₀ est utilisé comme une variable, calculée suivant la valeur de X
:End                      // fin de la boucle For
:Disp "SOMME="
:Disp W                   // affiche la valeur de W



edit 2 : alors là, il y a un problème, j'enlève les balises code
edit 3 : je peux aussi effacer l'écran avant avec   :ClrHome

je n'arrive pas à reproduire les fonctions cosinus et sinus, il m'affiche soit 0 soit 1 soit -1 : le plus proche

par exemple, sin(π/3)=1.00000000 d'après l'ordinateur !

T'as fait tes operations avec quel type de variable?
Tu n'as pas de warning dans ton compilateur?
Si tu as mis dans un entier(int) c'est normale qu'il te sorte des entiers.
Si tu as mis tout en "float" ou "double", bah .. ca doit être autre chose mais après on peut pas trop deviner où est l'erreur
(montre ton code)

j'ai tout mis en double

cos et sin prennent des float en paramètre

c'est plus petit, float

et j'ai esayé d'ouvrir math.h et il y a un truc comme "long double"