一元三次方程(II)

程式可以計算一元三次方程的三個根(包括複數根)。

程式編寫日期: 2006年9月22日

程式(144步)

1 Kout 6 2. ENT 3. Kin 1 4. Kin 2 5. Kin 4
6. Kin 6 7. Kout 5 8. ENT 9. Kin 3 10. Min
11. Kin 5 12. ENT 13. Kin × 2 14. Kin × 3 15. Kin × 6
16. ENT 17. Kin × 1 18. 3 19. Kin × 1 20. Kin × 6
21. Kout 5 22. x2 23. Kin × 5 24. Kin - 6 25. Kout 6
26. x2 27. Kin × 6 28. Kout 1 29. Kin - 3 30. Kout 4
31. Kin × 3 32. 9 33. Kin × 3 34. 2 35. Kin ÷ 3
36. X←→K5 37. Kin - 3 38. Kout 3 39. R→P 40. x2
41. Kin + 6 42. 4 43. 9 44. +/- 45. 10x
46. Kin + 6 47. Kout 6 48. x2 49. 50. Kin ÷ 6
51. 52. Kin 1 53. = 54. 3 55. Kin × 5
56. X←→Y 57. ÷ 58. 3 59. = 60 cos
61. Kin × 5 62. Kout 3 63. + 64. X←→K1 65. Kin - 1
66. = 67. 3 68. X←→K1 69. 3 70. Kin + 1
71. 1 72. Kin + 6 73. 2 74. Kin ÷ 6 75. Kout 6
76. Kin × 1 77 sin-1 78. cos 79. Kin × 5 80. Kout 5
81. Kin + 1 82. MR 83. Kin - 1 84. Kout 4 85. Kin 3
86. Kin ÷ 1 87. Kin ÷ 2 88. 3 89. Kin ÷ 1 90. Kout 1
91. Kin 6 92. Kin × 3 93. MR 94. Kin + 3 95. Kout 3
96. Kin × 6 97. X←→K2 98. Kin + 6 99. Kout 3 100. Kin 5
101. x2 102. - 103. 2 104. Kin × 4 105. ×
106. Kout 4 107. × 108. Kout 6 109. = 110. Min
111. x2 112. 113. 114. Kin 6 115. Kin + 2
116. Kin - 3 117. Kout 4 118. Kin ÷ 6 119. +/- 120. Kin ÷ 2
121. Kin ÷ 3 122. Kin ÷ 5 123. Kout 2 124. SCI 9 125. RND
126. X←→K3 127. RND 128. Kin 2 129. Kout 5 130. RND
131. X←→K6 132. RND 133. Kin 5 134. Kout 1 135. RND
136. Norm 137. Kin 1 138. HLT 139. MR 140. +/-
141. x > 0 142. Kout 2 143. HLT 144. Kout 3    

 

例題1: 解 2x3 - x2 - 72x + 36 =0

P1  再按 2 RUN 1 +/- RUN 72 +/- RUN 36 RUN (顯示第一個根為6)

EXE (顯示第二個根為 0.5) EXE (顯示第三個根為 -6)

 

例題2: 解 3x3 - 5x2 + x - 4 =0

P1 再按 3 RUN 5 +/- RUN 1 RUN 4 +/- RUN (顯示第一個根為1.86977)

RUN (出現"ENT"表示為複數根,顯示實數部為 - 0.101554)

RUN (顯示虛數部為 0.838323 i)

所以方程式的三個根為 x=1.86977 或 x= - 0.101554 ± 0.838323 i

 

返回 fx-3900PV程式集