A SERVICE OF

logo

Mathematics Programs 15–27
Program Lines:
(In RPN mode)
Description
 ! 
Stores 1 or JK – a
1
/2.
  
 !ª 
Calculates sign of C.
  
J
.
 º
J
2
 . 
J
2
-– a
2
.
 - 
 - 
J
2
-– a
2
+y
0
.
 º
C =
02
2
yaJ +
.
 !º 
Stores C with proper sign.
  
J
.
 - 
J
+ L.
  
K
.
 - 
K
+ M.
 % !
Calculate and display two roots of the fourth–order
polynomial.
  
J
.
 . 
J
L.
  
K
.
 . 
K
M.
Checksum and length: 539D 171
!  !
Starts routine to calculate and display two roots.
! % 
Uses quadratic routine to calculate two roots.
Checksum and length: 410A 6
  
Starts routine to display two real roots or two complex
roots.
  
Gets the first real root.
 ! %
Stores the first real root.
 #$ %
Displays real root or real part of complex root.
  
Gets the second real root or imaginary part of complex
root.
  @ 
Were there any complex roots
?