ВУЗ:
Составители:
Рубрика:
F := s/sqr(2*π)
Q := 0.5–F
Lhqghklv\uqbke_gbyJm\_ebqb\Z_lkyijbmf_gvr_gbbY.
LZ[ebpZ
Y P
J
0,5 0,69146246 0,691462
1 0,84134475 0,841345
3 0,9986501 0,9986501
4.5 0,99999676 0,9999966023
5 1,0000007 0,99999971335
IJH=J:FF:
10 INPUT “Y=”; Y
20 LET A = Y : LET B = Y : LET S = Y
30 LET N = 0
40 LET N = N+1
50 LET B = –B*(X
↑
2)/(2*N)
60 LETA = B/(2*N+1)
70 LET S = S+A
80 IF ABS(A) >= 1E–10 THEN GOTO 40
90 LET Q = S/SQR(2*PI)
100 LET Q = 0.5+Q
110 PRINT “Y=”; Y, “Q=”; Q
120 GOTO 10
:e]hjblf
:
Lhqghklv\uqbke_gby
Q
ihZe]hjblfZfbaZf_lgh
mf_gvrZ_lkyijb[hevrbo
Y.
>ey
Y > 2
lhqgu_\uqbke_gbyh[_ki_qb\Z_ljZaeh`_gb_
bgl_]jZeZ\_jhylghkl_c\p_igmx^jh[v
Q(y)= 1/
π
2
∫
∞
−
y
t
dte
2
2
=
...
4
3
2
1
1
2
2
+
+
+
+
+
⋅
−
y
y
y
y
y
e
y
π
\\h^F
\\h^
Y
z := Y
pbde^ey
N = M
^hrZ]
–1
F := s/sqr(2*π) Q := 0.5–F ���������������������������������������������������Y. ���������� Y P��������� ���������� 0,5 0,69146246 0,691462 1 0,84134475 0,841345 3 0,9986501 0,9986501 4.5 0,99999676 0,9999966023 5 1,0000007 0,99999971335 ���������� 10 INPUT “Y=”; Y 20 LET A = Y : LET B = Y : LET S = Y 30 LET N = 0 40 LET N = N+1 50 LET B = –B*(X ↑2)/(2*N) 60 LETA = B/(2*N+1) 70 LET S = S+A 80 IF ABS(A) >= 1E–10 THEN GOTO 40 90 LET Q = S/SQR(2*PI) 100 LET Q = 0.5+Q 110 PRINT “Y=”; Y, “Q=”; Q 120 GOTO 10 ����������: ��������������������Q����������������������������� ������������������������Y. ����Y > 2������������������������������������������� �������������������������������������� ∞ −t 2 2 e −y 1 Q(y)= 1/ 2π ∫e y 2 dt = 2π ⋅ y + 1 2 y + 3 y + 4 y + y + ... ������ �����Y z := Y ���������N = M ���������–1
Страницы
- « первая
- ‹ предыдущая
- …
- 8
- 9
- 10
- 11
- 12
- следующая ›
- последняя »