估數字(I)
程式是參考論壇網友及yathimc程式編寫及修改。
程式編寫日期: 2010年11月6日
程式會產生一個 0至999的整數，遊戲的目的是要找出這個數字，每次估數字時，若果估值較大時會顯示1的提示，若果估值較少會顯示 - 1的提示，若果估的數字正確，會顯示所用的總次(六十進數的值)。
注意: 10x是按shift log，Mo 是按 ALPHA M+ o,,,
程式一 (35 bytes)
Mem clear: Ran# 10x 3→B: Lbl 0: ?→A: 1M+:
A-B => Ans ÷ √Ans2◢ Ans => Goto 0◢ Mo
程式二 (34 bytes)
注意: 程式二要在複數模式下(CMPLX MODE)輸入程式。
Mem clear: Ran# 10x 3→B: Lbl 0: ?→A: 1M+:
A-B => Ans ÷ Abs Ans◢ Ans => Goto 0◢ Mo
操作方法:
1. 先按 Prog 1 執行程式
2. 再輸入估計的數值 EXE 這時會顯示 1 或 - 1 或 一個六十進數的數值
3. 若果未估中數字，再按 EXE ，再重返步驟2，直至估中數值為止。