1樓：告訴我→為什麼
我的vj帳號是andy_xu,還有問題可以找我。
不要聽ls的瞎鄭派說，不用排序。
暈、、我知道你**錯了，你應該把內層的for j:=1 to m do 改為。
for j:=1 to n do 我試過了，是對的。下次仔細一點吧。
我的博襲叢棗客上還有資訊拍拆學奧賽的東西，去看看吧。
2樓：網友
暈了。m,n你是反著讀的。
看你的絕唯第五個迴圈山巨集吵，應該逗侍是對每乙個陶陶進行考慮，所以應該是for i:=1 to n do吧，你寫的 to m 。
3樓：網友
要把b陣列從大到小睜雹排序悉雹帆(用快排，否則超時),最後的readln;去掉。
var a,b:array[1..3000] of longint;
i,j,n,p,m:longint;
procedure qsortb(l,r:longint);
var i,j,m,t:longint;
begini:=l; j:=r; m:=b[(i+j) div 2];
repeat
while b[i]>m do inc(i);
while b[j]j;
if l0) and (a[i]>b[j]) thenbegindec(p);
b[j]:=0;
break;
end;end;
writeln(p);
end.
free pascal題目：蘋果摘淘淘 幫我修改一下,不是發程式！！！！！！！
4樓：網友
演算法應該是：
把淘淘陣列從大到小排序（或者從小到大，總之要排序）把蘋果陣列從大到小排序。
從淘淘最大值逐個向最小值遍歷(for)，設逐個淘淘高為t，同時從大到小逐個測試蘋果的高值a與t的大小，大或等於則算已摘，進入下乙個t
小則跳過，換下乙個a
直到淘淘或蘋果被遍歷完盡。
返回剩餘的淘淘數(蘋果先完則會自動返回》0的值)
pascal濤濤摘蘋果
5樓：網友
if pp[e]改成if pp[e]<=a+30 then b:=b+1;
因為題目說只要碰到就算掉落。
6樓：網友
蘋果高度是整數，不需要real
求rqnoj 蘋果摘陶陶 測試資料或幫忙找錯 不要標程。拜託各位大神
7樓：禽獸
你這排序。。。i 1 to m j 變成了 i+1 to n 了。滿意。
幾道簡單的pascal題,麻煩幫忙一下,拜託了,急用
8樓：網友
這是奧賽的初賽題！
3. var a:array[1..1000] of 0..1;
b:array[1..1000] of integer;
k,n,i:integer;
beginreadln(n);
for i:=1 to n do begin read(b[i]);a[b[i]]:=1;end;
for i:=1 to 1000 do k:=k+a[i];
writeln(k);
for i:=1 to 1000 do if (a[i]=1) then write(i,' ');
end.4. var a:array[1..10] of 0..300;
n:99..121;
i,z:integer;
beginz:=0;
for i:=1 to 10 do read(a[i]);
readln(n);
for i:=1 to 10 do
if (n+30>=a[i]) then inc(z);
writeln(z);
end.5. var a:array[1..7,1..2] of 0..10;
i,j,max,x:integer;
beginmax:=0;x:=0;
for i:=1 to 7 do
beginfor j:=1 to 2 do
read(a[i,j]);
if (a[i,1]+a[i,2]>max) then begin max:=a[i,1]+a[i,2];x:=i;end;
end;writeln(x);
end.
摘桃子 pascal程式設計 （初級）快快快急需
program zaozi type arr array 1.10000 of longint var n,m,i,j,ans,sum longint a,b arr procedure qs var a arr l,r longint var i,j,mid,t longint begin i l...
夢見摘青蘋果和紅蘋果,青蘋果和紅蘋果的區別
夢見摘青蘋果,要遭受損失。夢見摘熟透了的蘋果,會意外得到財富或事業一帆風順。夢見蘋果是好兆頭,大吉大利,會走好運的 青蘋果和紅蘋果的區別 紅蘋果養心,青蘋果健骨,黃蘋果護眼。你或許明白不同顏色的蘋果,口味會有什麼差別。但是你知道蘋果的顏色不同,健康價值也不一樣嗎?近日,國外 健康狂 報道,蘋果的顏色...
夢見別人摘了最好的紅蘋果給我,夢見別人摘了一個最好的紅蘋果給我
所謂蘋果,有平安,結果。之意。顧名思義 某件事情會有比較好的平平安安之結果。夢到紅蘋果,代表什麼 夢見蘋果 是成功和長壽的祥兆。夢見筐裡有很多熟透了的蘋果或桌子上擺著汁多熟透了的蘋果,彩票會中獎,或找到地下財富。同時,有可能自己聲譽鵲起 官運亨通。未生育過的婦女做上述的夢,是吉兆,她會很快懷孕。夢見...