Section courante

A propos

Section administrative du site

COS

Cosinus
GWBASIC

Syntaxe

COS(n)

Paramètres

Nom Description
n Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter. Ce paramètre doit être en radian.

Description

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

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)

Exemples

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

  1. 10 I = 0
  2. 20 WHILE I < 2
  3. 30  PRINT "Cos(";
  4. 40  PRINT USING "#.#"; I;
  5. 50  PRINT ")="; COS(I)
  6. 60  I = I + 0.1
  7. 70 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

L'exemple suivant permet d'afficher le résultat de deux fois le cosinus de .4 :

  1. 10 X=2*COS(.4)
  2. 20 PRINT X
  3. RUN

on obtiendra le résultat suivant :

1.842122

L'exemple suivant permet de convertir des degrés en radians :

  1. 10 PI=3.141593
  2. 20 PRINT COS(PI)
  3. 30 DEGREES=180
  4. 40 RADIANS=DEGREES*PI/180
  5. 50 PRINT COS(RADIANS)
  6. RUN

on obtiendra le résultat suivant :

-1
-1


Dernière mise à jour : Lundi, le 19 janvier 2015