Section courante

A propos

Section administrative du site

Cos

Cosinus
HighSpeed Pascal System

Syntaxe

Function Cos(N):Real;

Paramètres

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

Description

Cette fonction trigonométrique retourne le «Cosinus».

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

L'exemple suivant permet de mettre dans la variable R le résultat du cosinus de 100 :

  1. Program CosSamples;
  2. Var
  3.  R:Real;
  4. BEGIN
  5.  R:=COS(100);
  6. END.


Dernière mise à jour : Lundi, le 20 avril 2020