Pascal 的問(wèn)題，高手進(jìn)！

你要搜索，那么我們就必須先確保該數(shù)組排序，然后不斷的二分法嘗試 像一個(gè)陣列100號(hào)，從小到大的順序行，求x -1存在，或代表x的函數(shù)在一個(gè)數(shù)組下標(biāo) 存在（X：Longint型）：Longint...

pascal的書(shū)我推薦清華大學(xué)鄭啟華先生的《pascal程序設(shè)計(jì)》?！秔ascal 語(yǔ)言(青少年信息學(xué)奧林匹克競(jìng)賽培訓(xùn)教材 中學(xué))》講的實(shí)例比較多。 flash的書(shū)《FLASH MX Profe...

比如寬搜一棵二杈樹(shù) 先建立一個(gè)隊(duì)列 把樹(shù)根入隊(duì) 然后從隊(duì)頭開(kāi)始 遍歷隊(duì)頭的每一個(gè)孩子 分別將每一個(gè)孩子入隊(duì) 以上反復(fù)執(zhí)行 直到隊(duì)為空

懂隊(duì)列嗎?懂就好辦了 -隊(duì)列初始化 -while 隊(duì)首指針=隊(duì)尾指針then 輸出無(wú)解 end. 基本就是這樣了，沒(méi)什么難的，好好學(xué)吧，我也剛會(huì)不久

program hxdb; var i:integer; {循環(huán)變量i，代表人數(shù)} x,y,z:integer; {代表三次排尾人數(shù)} begin ...

用隊(duì)列，讀取頭節(jié)點(diǎn)，處理后把與之相關(guān)的節(jié)點(diǎn)加入隊(duì)列，直到隊(duì)列的頭節(jié)點(diǎn)趕上尾節(jié)點(diǎn) q[1,1]:=x1;q[1,2]:=y1;//最初的節(jié)點(diǎn)進(jìn)隊(duì)列 t:=1;//隊(duì)首指針 tail:=1;//隊(duì)尾指針...

1.最簡(jiǎn)單的方法，枚舉5個(gè)人帶來(lái)的糖塊數(shù)目，然后按題意分，分完后符合條件就輸出。在此之上加優(yōu)化（其實(shí)加不加都差不多，又不是比賽，不過(guò)優(yōu)化程序可以給老師表?yè)P(yáng)O(∩_∩)O~），如for循環(huán)時(shí)，5人的糖塊...

第一題：var n,s,i,l,j:longint; a:array[1..200] of integer; begin readln(n); a[1]:=1;l:=1; for ...

1、3我不清楚，2我知道。 先uses sysutils; 然后time（不用自己定義）返回一個(gè)實(shí)型的數(shù)，就是當(dāng)前的系統(tǒng)時(shí)間，單位是天。

var n:longint; function step(a:longint):longint; begin if a-1=0 then exit(1); if a-2=0 then ...