信用卡最低還款
程式可以計算以信用卡借款並以最低還款額時，還款期及總利息等。
程式編寫日期: 2006年9月7日
程式 (147 bytes)
?→A: ?→B: ?→C: ?→D: 1 + B÷1200→B:
C÷100→C: B - BC→X: log (D÷AC) ÷ log X + . 5:
Fix 0: Rnd◢ Ans→M: AX^Ans→Y:
AC (1 - X^M) ÷ (1 - X) - A→A: DB ÷ (B - 1→M:
log ( (M - D) ÷ (M - Y) ) ÷ log B + . 5: Rnd: Norm 1◢
Ans→C: M - (M - Y)B^Ans◢ A + DC + Ans
例題: 以信用卡借款$10000，信貸利息的年利率為30%，複利計算，每月一結，每月取低還款額為尚欠款額的5%或$50，取其較大者。現每月以最低還款額還款，求
(i) 以尚欠款額5%方法還款的期數，
(ii) 以$50還款的期數，
(iii) 最後一期的還款金額及
(iv) 支付的總利息。
按 Prog 1 再按 10000 EXE 30 EXE 5 EXE 50 EXE (顯示以5%還款期數為87)
EXE (顯示以$50還款期數為26) EXE (顯示最後一期還款額為$32.64)
EXE (顯示總利息為$8497.60)