Section courante

A propos

Section administrative du site

En Turbo Basic, il n'existe aucune fonction «ArcSin» ou «ASin» permettant de calculer l'Arc Sinus d'un cercle. Pour remédier à se problème, il suffit de créer une fonction ressemblant à ceci:

DEF FNASin(a)
   PI=3.141592653589793 
   If Abs(a)=1 Then  
      FNASin = a*PI/2 
   Else  
      FNASin = Atn(a/Sqr(1-a*a)) 
   End If 
END DEF

PRINT FNASin(0.5)

La dernière ligne contient une instruction «PRINT» retournant la valeur 0.5235987901687622 lors de l'exécution de se petit programme.



Dernière mise à jour : Mardi, le 28 juillet 2015