估數字(I)

程式新版

程式是參考論壇網友、yathimc及SuperMANganese的程式編寫及修改。

程式會產生一個 0至999的整數，遊戲的目的是要找出這個數字，每次估數字時，若果估值較大時會顯示1的提示，若果估值較少會顯示 - 1的提示，若果估的數字正確，會顯示所用的總次(六十進數的值)。

程式編寫日期: 2009年8月9日

注意: E 是按 EXP，M^o 是按 ALPHA M+  ^o,,,

程式一 (36 bytes)

ClrMemory: E3 Ran#→B: 1: While Ans²M+: ?→A:

(A>B) - (B>A => Ans◢ WhileEnd: M^o

程式二 (較簡短版本，33 bytes)

ClrMemory: E3 Ran#→B: While Ans: 1M+: ?→A:

(A>B) - (B>A◢ WhileEnd: M^o

註: 程式二雖然更簡短，但有千分一的機會立即顯示0次，若出現這程情況，只要再按 EXE 就可回復正常。另外程式二估中會先顯示0，然後再顯示總次數。

操作方法:

1. 先按 Prog 1 執行程式

2. 再輸入估計的數值 EXE 這時程式一會顯示 1 或 - 1 或 一個六十進數的數值， 程式二會顯示 1 或 - 1 或 0 (若出現0再按EXE會顯示一個六十進數的數值。

3. 若果未估中數字，再按 EXE ，再重返步驟2，直至估中數值為止。 

返回 CASIO fx-50FH 及 fx-50F PLUS 程式集