【正文】 TButton *bt_2。 TButton *bt_eq。 TButton *bt_iAndm。 TButton *bt_Leftc。 TButton *bt_bkspace。 TMenuItem *H1。 TMenuItem *E1。}// （/*由BCB生成*/）窗體類的聲明頭文件 ，由VC++中的BCB自動生成 。exception)。 } catch(Exceptionamp。exception)。 } catch(Exception amp。MainForm)。//WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int){ try { Application Initialize()。 }} /*由BCB生成*/本節(jié)為軟件的工程初始化頭文件，由VC++中的BCB自動生成。X39。) *ans = and(*ans, actNum)。 } } else if(*nowSym == 39。 while(_isbig(actNum, zero)) { *ans = mul(*ans, actNum)。 initNum(amp。!39。) *ans = mod(*ans, actNum)。 } else if(*nowSym == 39。239。 [1] = 2。) { initNum(amp。 } } else if(*nowSym == 39。 !_isbig(zero, actNum)。 tmp = *ans。 return 。zero)。Y39。) { *ans = mul(mul(*ans, *ans), *ans)。 else if(*nowSym == 39。239。) *ans = div(*ans, actNum)。 else if(*nowSym == 39。*39。) *ans = dec(*ans, actNum)。 else if(*nowSym == 39。+39。 else *ans = actNum。N39。) doAns(ans, actNum, amp。) { if(lastSym != 39。 } } else if(lastKey == key_num) { if(*nowSym == 39。 else *ans = actNum。N39。) doAns(ans, actNum, amp。 else if(lastSym != 39。N39。N39。, lastSym, key_num)。) doAns(ans, *ans, nowSym, 39。) { //if(*nowSym != 39。 if(lastKey == key_sym) { if(newSym == 39。the1)。}void doAns(HIGH *ans, HIGH actNum, char *nowSym, char newSym, char lastSym, bool lastKey){ HIGH the1, zero, tmp。 r = binToshi(r)。 i = med。 med = (meda medb) ? meda : medb。 meda = getMed(tmpa)。 tmpa = bin(a)。 initNum(amp。HIGH xor(HIGH a, HIGH b) //異或{ HIGH tmpa, tmpb, r。}XOR函數(shù)介紹：Visual Basic中式一種邏輯運算符，用來連接兩個或多個關(guān)系式，組成一個布爾表達(dá)式。 r = binToshi(r)。 i++) [i] = [i] amp。 for(i = 1。 medb = getMed(tmpb)。 tmpb = bin(b)。r)。 int med, meda, medb, i。}AND函數(shù)介紹：用于對兩個表達(dá)式進(jìn)行邏輯與運算[1]。 two = mul(two, thetwo)。 i++, tmp = inc(tmp, the1)) { [1] = [i]。 for(i = 1。 initNum(amp。 [1] = 2。two)。thetwo)。the1)。tmp2)。tmp)。 HIGH r, tmp, the1, tmp2, two, thetwo。 } } return r。N39。 _lastKey = key_num。 nowSym = 39。 Application MessageBox(數(shù)字太大！, 錯誤, MB_OKCANCEL)。 if(getMed(r) MAXSHOW) { initNum(amp。 [i] = [1] % 2。 return r。 lastSym = 39。N39。 nowShow = zero。r)。 [1] = 2。 initNum(amp。 initNum(amp。 initNum(amp。}HIGH bin(HIGH a) //轉(zhuǎn)化二進(jìn)制{ int i = 0, j。 return r。 lastSym = 39。N39。 nowShow = zero。r)。 a = div(a, eight)。 } while(_isbig(a, zero)) { i++。 nowShow = zero。 lastSym = 39。N39。 Application MessageBox(不能為負(fù)數(shù)！, 錯誤, MB_OKCANCEL)。 if([0] == 1) { initNum(amp。eight)。r)。zero)。 HIGH zero, r, eight。 } } return r。N39。 _lastKey = key_num。 nowSym = 39。 Application MessageBox(數(shù)字太大！, 錯誤, MB_OKCANCEL)。 if(getMed(r) MAXSHOW) { initNum(amp。 [i] = getHex(mod(a, sixteen))。 return r。N39。 _lastKey = key_num。 nowSym = 39。r)。 [2] = 1。sixteen)。r)。zero)。 HIGH zero, r, sixteen。 else return [2] * 10 + [1]。 else if(a == 15) return F。 else if(a == 13) return D。 else if(a == 11) return B。return dec(a, mul(tmpans, b))。 HIGH tmpans。在matlab的命令窗口中輸入help mod或者doc mod可以獲得該函數(shù)的幫助信息。 } return r。 someZero = mul(someZero, b)。someZero)。 [i] = j。 } [1] = j。 !_isbig(cmp, tmpHigh)。cmp)。tmpHigh, i, ma)。tmpHigh)。 i 0。 [0] = 0。 else [0] = 1。theone)。r)。 HIGH r, tmpHigh, cmp, someZero, theone。 return r。 return r。N39。 _lastKey = key_num。 nowSym = 39。r)。 [i] %= 10。 i MAXN 1。 i++) [i] = [i] + [i]。 } for(i = 1。 } else if([0] == 1) { [0] = 0。 else if([0] == 1) { [0] = 0。amp。zero)。r)。 bool m = false, err = false。(n指相應(yīng)的增量)Dec(i,n)是自減函數(shù) 只針對整數(shù)(inc同)HIGH inc(HIGH a, HIGH b) //高精度加法{ int i。 return r。 [i] = 10 + [i]。 i = med。 i++) [i] = [i] [i]。 for(i = 1。 return dec(b, a)。 } if(!absCmp(a, b)) { [0] = ([0] == 0) ? 1 : 0。 } else if([0] == 1) { [0] = 1。 else if([0] == 1) { [0] = 1。amp。r)。 bool m = false。 HIGH r。在pascal中，dec（a）表示a:=a1 dec(a,b):=a:=ab。 return r。 [0] == 0)) [0] = 0。 [0] == 1) || ([0] == 0 amp。 } if(([0] == 1 amp。N39。 _lastKey = key_num。 nowSym = 39。 Application MessageBox(數(shù)字太大！, 錯誤, MB_OKCANCEL)。 } if([MAXN 1] 9) { initNum(amp。 i++) { [i + 1] += ([i] / 10)。 } for(i = 1。 j = tmpMed。 return r。 lastSym = 39。N39。 Application MessageBox(數(shù)字太大！, 錯誤, MB_OKCANCEL)。 if(tmpMed + i MAXN) { initNum(amp。 [k] %= 10。 k tmpMed。 return r。 lastSym = 39。N39。 Application MessageBox(數(shù)字太大！, 錯誤, MB_OKCANCEL)。 if(tmpMed + i MAXN) { initNum(amp。 j++) { [j] = [i] * [j]。 for(j = 1。 i++) { initNum(amp。