繼續嘗試輸入「債券購價」計算程序來跑
繼續嘗試輸入「債券購價」計算程序來跑---再續「老姐留下來的計算器」
筆者在自己的拼圖台上，參考著以前修讀「投資學」的課本，嘗試編寫此程序
筆者在前兩篇文曾提過將「等值利率」計算程序給輸入到計算器讓它跑的實況後，又看到有人在知識家上PO問題說「CASIOFC200型財務計算器能否計算債券」筆者心想：「此一計算器也具有PROG功能，只差不能輸入三角函數而已，其他CASIO計算器的程序應能通用」，又想：「上投資學時，如果能把此一程序記入，就能夠給它跑個兩三題沒有問題」，才想到將此一「債券購價」公式給編寫成程序來跑，筆者經過了多次嘗試失敗，甚至還曾發生步驟不夠用的窘境，才想出了以下程序，輸入到計算器裡：
債券購價=每期息票額×PVIFA(ytm,n)+面額×PVIF(ytm,n)
例題：債券面額＝1000；每期息票額＝60；YTM=5.8%；n=5；求購價？
輸入程序前同樣要先按[MODE]>[EXP]進入「LRN」模式，選擇要輸入程序的位置（P1或P2）：
( | 1+ | ENT0.058 | ) | X^y | ENT-5 | -1 | X<=>Y | = | ÷ |
ENT0.058 | × | ENT60 | = | Kin1 | ( | 1+ | ENT0.058 | ) | X^y |
ENT-5 | × | ENT1000 | = | Kin2 | Kout1 | + | Kout2 | = |
輸入完後開始執行，同樣按[MODE]>[.]回到「RUN」模式，再按所指定之程序位置（本例使用P1）：
0.058[RUN]
-5[RUN]
0.058[RUN]
60[RUN]
0.058[RUN]
-5[RUN]
1000[RUN]
統統依序輸入後，計算器計出結果為：1008.470764
之後筆者又試另外一例：
0.05[RUN]
-5[RUN]
0.05 [RUN]
60[RUN]
0.05 [RUN]
-5[RUN]
1000[RUN]
計算器計出結果為：1043.294767
寫完此程序後，筆者覺得它不能完全按照公式跑，容易輸入錯誤為遺憾，但這只是第一版，此後筆者還是會想要出修改版吧。
而且，那位CASIOFC200的使用者應該不需要編寫這「又臭又長」的程序吧，因為你可以按照上述公式將要用到的內置財務函數輸入順序給編寫成程序即可。
（完）