Casio 3950P, Руководство по программированию

Страница: 26 / 48

24
15 The angle between two vectors
The angle between two vectors and , not equal to 0 for 0 being the origin, can be
obtained in the following way:
Program
？→ Ａ：？→ Ｂ：？→ Ｃ：Ａ → Ｘ：Ｂ → Ｙ：Ｃ → Ｍ：？→ Ａ：？→ Ｂ：？→ Ｃ： （ＡＸ ＋ ＢＹ
＋ＣＭ） ÷√ （ （Ａ
２
＋Ｂ
２
＋Ｃ
２
） （Ｘ
２
＋Ｙ
２
＋Ｍ
２
） ） →Ｄ
:
ｃｏｓ
－１
Ｄ→Ｄ：Ｄ ＜
79 STEP
＞
INPUT
＜
1st
＞ Ａ
,
Ｂ
,
Ｃ： （
a
1
,
a
2
,
a
3
） ＜
2nd
＞ Ａ
,
Ｂ
,
Ｃ： （
b
1
,
b
2
,
b
3
）
OUTPUT
Ｄ
: the angle between two vectors:
Execution Example:
Find the angle between the vectors (0,0,1) and (2,3,4).
To obtain the answer in radians, press before
executing the program.
θ
a → b
→
a
b
θ
1 –
cos
a b
⋅
a b
------------ =
→
→
→
→
a a
1
a
2
a
3
, ,
( )
=
b b
1
b
2
b
3
, ,
( )
=



→
→
ON
MODE MODE MODE 1
PRGM
MODE 1
COMP
1
P1
θ
MODE MODE
MODE MODE 1
DEG
S A D R P1 P1 P2 P3 P4 G
Prog 1
0 EXE
M
S A D P1 P1 P2 P3 P4 G D
0 EXE 1 EXE
M
S A D R P1 P1 P2 P3 P4 G
2 EXE 3 EXE 4 EXE
M
S A D R P1 P1 P2 P3 P4 G
MODE MODE MODE MODE 2
関数電卓事例集 .book 24 ページ ２００２年９月２日 月曜日 午後６時５１分