1樓：匿名使用者
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;j:=r;mid:=a[(l+r)shr 1];
repeat
while(a[i]mid)do dec(j);
if(i<=j)then
begin
t:=a[i];a[i]:=a[j];a[j]:=t;
inc(i);dec(j);
end;
until i>j;
if(j>l)then qs(a,l,j);
if(i=a[i])and(sum<2)thenbegin
inc(i);
inc(sum);
inc(ans);
end;
if(b[i]inc(j);sum:=0;
end;
end;
writeln(ans);
end.
2樓：
摘蘋果的加強版
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;j:=r;mid:=a[(l+r)shr 1];
repeat
while(a[i]mid)do dec(j);
if(i<=j)then
begin
t:=a[i];a[i]:=a[j];a[j]:=t;
inc(i);dec(j);
end;
until i>j;
if(j>l)then qs(a,l,j);
if(i=a[i])and(sum<2)thenbegin
inc(i);
inc(sum);
inc(ans);
end;
if(b[i]inc(j);sum:=0;
end;
end;
writeln(ans);
end.
3樓：青眼白龍
你不會是正在考試吧。。。。。。
4樓：匿名使用者
是cena嗎？
時間這麼嚴格？
題目：猴子吃桃問題：pascal程式
5樓：匿名使用者
var n,a,i:longint;
begin
readln(n);
a:=1;
for i:=1 to n-1 do
a:=(a+1)*2;
writeln(a);
end.
包好~~包好~~
6樓：匿名使用者
倒推。設第i天所剩桃子為fi,則fi=fi+1 * 2 +1由f10推f1
vari,j:longint;
begin
i:=1;
for j:=9 downto 1 do
i:=i*2+1;
writeln(i);
end.
7樓：匿名使用者
program monkey;
varnow,i:integer;
begin
for i:=2 to 10 do now:=(now+1)*2;
writeln(now);
end.
一道pascal程式設計題目，不知道怎麼優化程式才能不超時？只能一個一個加減？實在想不到，求大神們指點指點！
8樓：武風
空間換時間，用dp，應該是可行的，列舉分配桃子的方法，選取怒氣最少的
一道pascal程式設計題目，不知道怎麼優化程式才能不超時？只能一個一個加減？實在想不到，求大神們指點指點！ 50
9樓：匿名使用者
解決方案1：
用dp，應該是可行的，列舉分配桃子的方法空間換時間解決方案2：
為什麼您每次都是隻回答一句話？？？您這麼簡練的語言讓我情何以堪啊。可以具體點？並說說我的程式為什麼會超時，用列舉是不行的呀。
求您不要把問題看得那麼簡單好嗎？假如真那麼簡單我也不會問了，也不會搞這麼多懸賞了，好嗎？
解決方案3：
這樣一個個減我覺得是不行的
先qsort;
再編一個求相同值的 ss;
然後判斷需求量最大的那個與下一個需求量的差乘數量與m大小進行比較，不能滿足的話，就把差減一再比較，多出來的一個個減下去
然後再減下去，直到m=0然後break，輸出感覺比你的迴圈可以少一點步驟
夢見自己摘桃子，有幾個桃子熟了被我摘了，有桃子自己爬的很高我沒摘到，其都還沒有熟
代表了你的情感史，摘到的吃了，丟了，忘了，總在摘下一個，以為下 一個才是最好的，其實桃子並無太大區別，人作為一個類，也無太大區別，要警惕的是，貪得無厭地追求下一個，會給自己帶來困擾和不安 表示你目前事業財運不是非常好 夢見自己摘桃是什麼意思？桃子主財 桃子細膩柔軟，是財富的象徵。夢見桃子，能發大財。...
我摘桃子,小明摘了桃子,如果每次從我這裡出給小明拿多少次
我摘三百五十六個桃子,小明摘了320個桃子，如果每次從我這裡拿出3個給小明，可以拿119次。算式 356 2 3 1 118 1 119次。356 3 118 次 2 個 每次出了3個，118次，最後剩2個，不足3個，不算。我摘三五十六個桃子,小明摘了320個桃子,如果每次從我這裡出3個給小明拿多少...
為何想和男人摘桃子，為何想和一個男人摘桃子
想要能摘桃子肯定是這個，你春心萌動了嗎？肯定像他，男的一起去的是你姑娘要找物件了嗎？意思就是他辛辛苦苦付出把 樹 成長結果實，卻讓你不勞而獲？他樂沒有這麼好心 摘桃子是什麼意思？我有點不懂，能和我說說嗎？你是女生吧，如果喜歡和一個男生一起出去玩，估計是你對他有好感了。喜歡就大聲說出來，男人也會喜歡你...