Grapes/win 2.8
[Don't Edit] 3.14
----------
BGstretchOn BGfile
1 
----------
UserFunction
0
----------
y = f(x)
0
----------
0 = f(x,y)
0
----------
Point
22 1 6 0 0 0 0 0 2 3 4 0 0 0 0 0 0 0 0 0 0 0 5 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
P
5 0 1
P
r cos@
r sin@
1
0
Pi/2
@ 0.1
0 0
14737632 0 16777215 1 0 0 1 1 0 0
3 0 3
Q
1 0 1
Q
0.303949137451127
0.110624412540346
0


t 0.1
1 0
16744703 16711680 16777215 1 0 1 1 1 0 0
3 0 2
R
0 0 1
S
0 0 1
T
0 0 1
U
0 0 1
V
0 0 1
A
1 3 1
A
1.000
0
0


t 0.1
0 0
0 16711680 16777215 1 0 1 1 1 0 0
3 0 2
B
1 3 1
B
1
1
0


t 0.1
0 0
0 16711680 16777215 1 0 0 1 1 0 0
3 0 2
C
1 3 1
C
0
1
0


t 0.1
0 0
0 16711680 16777215 1 0 0 1 1 0 0
3 0 2
D
0 0 1
E
0 0 1
F
0 0 1
G
0 0 1
H
0 0 1
I
0 0 1
J
0 0 1
K
0 0 1
L
0 0 1
M
0 0 1
N
0 0 1
O
1 0 2
O
0
0
0


t 0.1
0 0
16777215 16711680 16777215 1 0 0 1 1 0 0
3 0 2
----------
Segments
4
1 1 1 16711680 16777215 2 0 1
0 
8 9 0 0 0 0 0 0 0 0 0
1 1 1 16711680 16777215 2 0 1
0 
9 10 0 0 0 0 0 0 0 0 0
1 1 1 16711680 16777215 2 0 1
0 
10 252 0 0 0 0 0 0 0 0 0
1 1 1 16711680 16777215 2 0 1
0 
252 8 0 0 0 0 0 0 0 0 0
----------
paramater
14
0.32345453901156 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1000 0
1 1 0.1 1 0
783 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
3.132 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
0.1 0
1 1 0.1 1 1
500 0
1 1 0.1 1 0
1 1 80
----------
KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle
1 4 2 1 1 0 1 1 0 0 0 32
DrawMode SegmentShowSync
1 0
AfterImageColorNo, CanAImg,MaxAimgN0
2 1 3001
circleMode
1
----------
ScaleX
Vlow,VHigh,label
0 888 x
x
AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible
1 1 1 0 1
NUmber,Base,Linterval,numberR
7 1 1 7
High,Low
1.11820921123433 -0.349559383806992
----------
ScaleY
Vlow,VHigh,label
0 888 y
AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible
1 1 1 1 0
NUmber,Base,Linterval,NumbeerR
7 1 1 7
High,Low
1.1161383195101 -0.351630275531223
----------
ScaleS
SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed
0 1 0 1 12 0 0 0 0 0 12 0 0 0
----------
Yvalue
1 1
----------
Iinterval
Svalue Evalue sliceNo
1 -1
1 1
40 10
Dfuncno Efuncno AreaQ
1 0 0
----------
Yvalue Function List
6
y1
y2
y3
y4
y5
y6
----------
Panel Position
0 61 122 233 494 605 666 738 1 1 1 1 1 1 1 1
1
----------
PetaMEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 16711680 3 12 0 0 0

24
点Qは[0,1]の乱数を使って打つ
Q：(rnd(1),rnd(1))
乱数で発生させた点Qの総数を
N、また1/4単位円内に落ちる
点Qの数をｎとすると
Pai≒4*ｎ/N
で求められる。
N=!{m}個
n=!{n}個
したがって
Pai≒4*ｎ/N＝!{t}
#//1000個の点でPaiを計算
# ClrAimg
# draw
# n:=1
# for m:=1 to 1000
# Q:=(rnd(1),rnd(1))
# draw
# a:=abs(Q)
#    if a<1 then n:=n+1
#    else
#   calc
# t:=4*n/m
# next
----------
11
270 451 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
----------
Table SECTION
RowNo, ColumnNo
0 10 200
Table Data


60 60 60 60 60 60 60 60 60 60
----------
SimpleMemo SECTION
0
----------