{ Calcul de la valeur de sin(a) au voisinage de 0.0 }
{ Utilisation du developpement limite               }
{ Les valeurs a et n sont donnees                   }

reel fonction sinus(-> reel a,-> entier n)
  reel sn
  reel terme
  entier i
  terme <- a
  sn <- a
  pour i de 3 à n pas 2 faire
    terme <- -terme*a*a/(i*(i-1))
    sn <- sn + terme
  fait
  retourner sn
fin fonction