求某位電腦高手幫助做個pascal程序!要自創,有新意,切記不能抄!!要快,此問題僅持續到今天

時間 2022-09-16 05:45:09

1樓:匿名使用者

type index=1..100;

var arr:array[1..100] of index;

var mid,low,high,search:integer;

i,n:index;

found:boolean;

begin

clrscr;

writeln('binary search');

writeln('enter the array size');

readln(n);

writeln('enter the array elements');

for i:=1 to n do

begin

readln(arr[i]);

end;

writeln('enter the search element');

readln(search);

low:=1;

high:=n;

found:=false;

repeat

mid:=trunc(low+high) div 2;

if (searcharr[mid]) then

low:=mid+1;

if (search=arr[mid]) then

found:=true

else

found:=false;

until ((found=true) or (highif found=true then writeln('element found')

else writeln('element not found');

end.

2樓:monkey家園

qq 739227481

3樓:太陽精靈

什麼題目,不要暗箱操作。

急求電腦高手,急求網路電腦高手

出現的英文字母背景是不是藍色的,不過藍屏出錯一般重啟後能正常進入系統。重啟後螢幕有畫面嗎?華碩電腦是膝上型電腦嗎?筆記本還是送售後檢查,或者去電腦店維修,省心省力。分析原因有以下 1 硬碟開機引匯出錯。2 硬碟壞掉了,進不了硬碟也就開不了機。3 記憶體條接觸不良。 知道使用者的老巢 電腦不開機,有多...

電腦高手請進,電腦高手請進求幫忙

電源問題,一般換電源就好了。按照樓主的說法 不會是bios電源設定問題 也不會是病毒什麼的造成的 先介意樓主開啟機箱 把電源 顯示卡 和記憶體 都重新插拔一下 如果問題沒有解決 很有可能是電源的問題 這個就不多說了 換個新的借問一下 你那裡市電怎麼樣 附近有沒有什麼用電量大的裝置比如空調 什麼的 當...

求電腦高手幫我看下,求電腦高手幫我看下

不要用360的瀏覽器,建議使用世界之窗瀏覽器。優化軟體推薦使用 ccleaner 魯大師也是可以的,但效果沒有前者好。如果你要用 ccleaner 的話 第一次優化的時候把所有的勾全打上,以後在優化的時候把高階的最後一項去掉。一般軟體之間是不會有衝突的,除非是多個軟體同時執行,比如說,你這邊開著優化...