1
VARIABLES
2
K EST_DU_TYPE NOMBRE
3
U EST_DU_TYPE NOMBRE
4
N EST_DU_TYPE NOMBRE
5
A EST_DU_TYPE NOMBRE
6
Binf EST_DU_TYPE NOMBRE
7
Bsup EST_DU_TYPE NOMBRE
8
DEBUT_ALGORITHME
9
AFFICHER "Entrez l'amplitude souhaitée"
10
LIRE A
11
N PREND_LA_VALEUR 2
12
TANT_QUE ((exp(1)-1)/(N*exp(1))>A) FAIRE
13
DEBUT_TANT_QUE
14
N PREND_LA_VALEUR N+1
15
FIN_TANT_QUE
16
AFFICHER "La valeur de N nécessaire est :"
17
AFFICHER N
18
U PREND_LA_VALEUR 0
19
POUR K ALLANT_DE 0 A N
20
DEBUT_POUR
21
U PREND_LA_VALEUR U+1/N*F1(K/N)
22
FIN_POUR
23
AFFICHER "Borne inférieure de l'encadrement"
24
Binf PREND_LA_VALEUR U-1/N
25
AFFICHER Binf
26
AFFICHER "Borne supérieure de l'encadrement"
27
Bsup PREND_LA_VALEUR U-1/(N*exp(1))
28
AFFICHER Bsup
29
FIN_ALGORITHME
30
31 Fonction numérique utilisée :
32 F1(x)=exp(-x*x)