估數字(II)
網友提供程式日期: 2008年5月31日
程式由網友 提供, 計算機會隨機產生一個1-1000的整數,遊戲的目的是要找出這個數字,每次估數字前會顯示該數值的可能範圍(以小數形式表示),若果估的數字正確,會顯示所用的總次(六十進數的值)。
注意: E 是按 EXP,而 Mo 是按 ALPHA M+ o,,,
程式 (67 bytes)
Mem clear: Fix 4: 1+E3 Ran#→B: 1→X: E3→Y:
Lbl 0: 1M+: X+Y÷E4→A: ?→A: A>B =>A→Y:
B>A => A→X: A-B => Goto 0: Norm 1: Mo
操作示範(假定要估的數值是924):
按 Prog 1 (顯示1.1000表示答案為1-1000的整數)
777 EXE (假設估777,顯示777.1000表示答案為777-1000的整數)
950 EXE (假設估950,顯示888.0950表示答案為888-950的整數)
924 EXE (假設估924,顯示4o0o0,表示4次估中答案)
註: 執行程式後,若未能估中答案,中途按 AC 或 ON 雖可終止程式,但計算機會保留在Fix 4(小數四位的設定),請自行按SHIFT MODE 3 1 (Norm 1) 取消小數四位的設定。