Section courante

A propos

Section administrative du site

COS

Cosinus
Turbo Basic

Syntaxe

COS(n)

Paramètres

Nom Description
n Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter

Description

Cette fonction retourne le cosinus d'un angle en radian.

Remarques

Algorithme

MODULE COS(X)
   RX x X
   S ← 42.0
   BOUCLE POUR I ← 10 JUSQU'A 1
      S ← 4.0 x I - 2.0 + (-R) / S
   FIN BOUCLE POUR
   SS x S
   RETOURNE (S - R) / (S + R)

Exemple

Voici un exemple permet d'afficher les Cosinus inférieurs à 2 :

  1. I = 0
  2. WHILE I < 2
  3.   PRINT "Cos(";
  4.   PRINT USING "#.#"; I;
  5.   PRINT ")="; COS(I)
  6.   I = I + 0.1
  7. WEND

on obtiendra le résultat suivant :

Cos(0.0)= 1
Cos(0.1)= .9950041651292624
Cos(0.2)= .9800665772491609
Cos(0.3)= .9553364856027306
Cos(0.4)= .9210609916817709
Cos(0.5)= .8775825618903727
Cos(0.6)= .8253356014475524
Cos(0.7)= .7648421565657944
Cos(0.8)= .6967066580378577
Cos(0.9)= .6216098935667861
Cos(1.0)= .5403022055569776
Cos(1.1)= .4535959939373373
Cos(1.2)= .3623575989258644
Cos(1.3)= .2674986448404438
Cos(1.4)= .1699669314456651
Cos(1.5)= 7.073696384636353E-002
Cos(1.6)=-2.919978444989768E-002
Cos(1.7)=-.1288447780130975
Cos(1.8)=-.2272023965314551
Cos(1.9)=-.3232898827252166

Références

INFOGUIDE - Turbo Basic, Editions P.S.I., Bénédicte Hudault, 1988, ISBN: 2-86595-531-1, page 38

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