Section courante

A propos

Section administrative du site

SIN

 Sinus
PL/1

Syntaxe

Y=SIN(X);

Paramètres

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

Description

Cette fonction trigonométrique permet de connaître le «Sinus» en radians.

Algorithme

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

Exemple

Voici un exemple permet d'afficher les Sinus inférieurs à π :

  1.  Corps: PROC options(main);
  2.       DECLARE (PI,I) float;
  3.       PI = 3.14159;   
  4.       I = 0;
  5.       DO WHILE (I < PI);
  6.                  display('Sin(' || I || ')=' || sin(I));
  7.             I = I + 0.1;
  8.       END;
  9.  END Corps;

on obtiendra le résultat suivant :

Sin( 0.00000E+0000)= 0.00000E+0000
Sin( 1.00000E-0001)= 9.98334E-0002
Sin( 2.00000E-0001)= 1.98669E-0001
Sin( 3.00000E-0001)= 2.95520E-0001
Sin( 4.00000E-0001)= 3.89418E-0001
Sin( 5.00000E-0001)= 4.79426E-0001
Sin( 6.00000E-0001)= 5.64642E-0001
Sin( 7.00000E-0001)= 6.44218E-0001
Sin( 8.00000E-0001)= 7.17356E-0001
Sin( 9.00000E-0001)= 7.83327E-0001
Sin( 1.00000E+0000)= 8.41471E-0001
Sin( 1.10000E+0000)= 8.91207E-0001
Sin( 1.20000E+0000)= 9.32039E-0001
Sin( 1.30000E+0000)= 9.63558E-0001
Sin( 1.40000E+0000)= 9.85450E-0001
Sin( 1.50000E+0000)= 9.97495E-0001
Sin( 1.60000E+0000)= 9.99574E-0001
Sin( 1.70000E+0000)= 9.91665E-0001
Sin( 1.80000E+0000)= 9.73848E-0001
Sin( 1.90000E+0000)= 9.46300E-0001
Sin( 2.00000E+0000)= 9.09297E-0001
Sin( 2.10000E+0000)= 8.63209E-0001
Sin( 2.20000E+0000)= 8.08496E-0001
Sin( 2.30000E+0000)= 7.45705E-0001
Sin( 2.40000E+0000)= 6.75463E-0001
Sin( 2.50000E+0000)= 5.98472E-0001
Sin( 2.60000E+0000)= 5.15502E-0001
Sin( 2.70000E+0000)= 4.27380E-0001
Sin( 2.80000E+0000)= 3.34989E-0001
Sin( 2.90000E+0000)= 2.39250E-0001
Sin( 3.00000E+0000)= 1.41121E-0001
Sin( 3.10000E+0000)= 4.15815E-0002

Dernière mise à jour : Samedi, le 18 octobre 2014