Download Wang 700 A/B

Section IX
Sample Programs
--------·~-------------------.-------.,
I PROGRAM
TITLE
NUMBER
1004A!MA6
ALGEBRA OF COMPLEX NUMBERS +, -, x, +
PAGE
2
\ - - - - - -------.--------------~l-'::::::--=----___t
If (2 - 5i) - (4 + 3i)
4.
SEARCH-
5.
Read
Y
X
If (2 - 5i) x (4 + 3i)
4.
SEARCH x
5.
Read
Y
X
(2 - 5i)
If (4 + 3i)
-2.0000000000
-8.0000000000
+23.0000000000
-14.0000000000
4.
SEARCH +
5.
Read
Y
X
-.280000000000
-1.04000000000
For chain operations repeat steps 3, 4, and 5
EXAMPLE,
.[(1 + 2i) (3 + 4i)] + (6 - 9i)
3 + 4i
2.
!.t 2; Key
3.
3 !4; SEARCH"
4 k 5.
0201
Read
Y
X
-5.00000000000
+10.0000000000
3.
Key 0201
4.
6 t 9 ; CH SIGN
-SEARCH +
5.
Read
Y
X
3.
+1. 00000000000
+1. 00000000000
Key 0201
31 4
-9WANG
LABORATORIES, INC.
4.
SEARCH +
5.
Read
136 HORTH ST., TEWKSBUIlY, MASS. 01115, TEL. (117)151-1'11
9-2
Y
X
+.280000000000
-.400000000000-01