ВУЗ:
Составители:
Рубрика:
3 0,9986501 0,99866501
IJH=J:FF:
10 INPUT “Y=”; Y
20 LET Z = EXP(–Y*Y/2)/SQR(2*PI)
30 LET R = 1 : LET S =0 : LET N = 0 : LET W = S
40 LET K = 2*N+1 : LET R = R*K
50 LET S = S+(Y
↑
K)/R : LET N = N+1
60 IF S–W >= 1E–10 THEN GOTO 40
70 LET P = 0.5+S*Z
80 PRINT “Y=”; Y ; TAB2 ; “P=”; P ; TAB2 ; “Q=”; 1–P
90 GOTO 10
>eyY > wlhlZe]hjblfg_jZ[hlZ_lldqbkehrlj_[m_lky
[hevr_^himklbfh]h^eyjZajy^ghck_ldbW<F
:e]hjblf
>ey Y > 0
F(y) = 1/
π
2
∫
−
y
t
dte
0
2
2
=
1/
π
2
+
⋅⋅
−
⋅⋅
+
⋅⋅
− ...
7!325!22
3!12
3
7
2
53
yyy
y
i = 0 1 2 3
A
0
A
1
A
2
A
3
H[hagZqbfghf_jZi = 0,1,2,… qe_gh\jy^ZA
0
,A
1
,A
2
,A
3
…
B
i
=
!2
12
i
y
i
i
⋅
+
, B
n
= –B
n–1
n
y
2
2
, n = 1,2,3,…
A
n
=
12
+
n
B
n
, A
0
= y, B
0
= y
\\h^Y
a := Y
b := Y
s := Y
n := 0
1: n := n+1
b := –b*(x
2
)/(2*n)
a := b/(2*n+1)
s := s+a
_keb
lhgoto 1
bgZq_
3 0,9986501 0,99866501 ���������� 10 INPUT “Y=”; Y 20 LET Z = EXP(–Y*Y/2)/SQR(2*PI) 30 LET R = 1 : LET S =0 : LET N = 0 : LET W = S 40 LET K = 2*N+1 : LET R = R*K 50 LET S = S+(Y ↑K)/R : LET N = N+1 60 IF S–W >= 1E–10 THEN GOTO 40 70 LET P = 0.5+S*Z 80 PRINT “Y=”; Y ; TAB2 ; “P=”; P ; TAB2 ; “Q=”; 1–P 90 GOTO 10 ����Y > �����������������������������������������r����������� �������������������������������� ���������� ������������������ Y > 0 y −t 2 F(y) = 1/ 2π ∫e dt =1/ 2π �� y − y + y � 3 5 2 y7 − 3 +...� 0 � 2 ⋅1!⋅3 2 ⋅ 2!⋅5 2 ⋅3!⋅7 2 � i= 0 1 2 3 A0 A1 A2 A3 �����������������i = 0,1,2,… ������������A0,A1,A2,A3… y 2 i +1 y2 Bi = , Bn = –B n–1 , n = 1,2,3,… 2 i ⋅ i! 2n B An= n , A0 = y, B0 = y 2 n +1 ������Y a := Y b := Y s := Y n := 0 1: n := n+1 b := –b*(x2)/(2*n) a := b/(2*n+1) s := s+a ���� ���goto 1 �����
Страницы
- « первая
- ‹ предыдущая
- …
- 8
- 9
- 10
- 11
- 12
- следующая ›
- последняя »