商及餘數(I)

商及餘數(I)

程式更新日期: 2009年12月30日

程式 (36 bytes，使用記憶為A及B)

?→A: ?→B: Fix 0:

Rnd( A ÷ B - . 5: Ans + (A - BAns=B: Norm 1◢

A - BAns

例題: 計算 97 ÷ 17 的商及餘數。

按 Prog 1 97 EXE 17 EXE (顯示商為5) EXE (顯示餘數為12)

註: 被除數必須為整數，而除數必須為正整數，否則計算結果錯誤。