1樓：匿名使用者
看你的程式太費勁，只好自己用記錄資料編一個（輸入部分請自行調整）：
type
node=record
up:longint;
down:longint;
end;
nodes=array[1..100] of node;
vard,dmax:nodes;
a,b,c:node;
e,max:longint;
n:integer;
i,j:integer;
procedure ***bile(a,b:node;var c:node; var e:longint);
begin
e:=a.up*a.down*b.down;
c.up:=a.up;
c.down:=b.down;
end;
function sum(d:nodes; n:integer):longint;
vara,b,c:node;
i:integer;
e,ei:longint;
begin
e:=0;
for i:=1 to n-1 do begin
a:=d[i];
b:=d[i+1];
***bile(a,b,c,ei);
d[i+1]:=c;
e:=e+ei;
end;
sum:=e;
end;
begin
n:=4;
d[1].up:=2; d[1].down:=3;
d[2].up:=3; d[2].down:=5;
d[3].up:=5; d[3].down:=10;
d[4].up:=10; d[4].down:=2;
e:=sum(d,4);
max:=e;
for i:=1 to n-1 do begin
a:=d[1];
for j:=2 to n do d[j-1]:=d[j];
d[n]:=a;
e:=sum(d,4);
if e>max then begin max:=e; dmax:=d; end;
end;
writeln;
writeln(max);
for i:=1 to n do writeln(dmax[i].up:8,dmax[i].down:8);
end.
放能核反應釋放的能量那裡去了？以什麼能量形式存在
首先核能不同於化學能，化學能是物質結構變化前後釋放的能量，核能則是更基本的，裂變前後生成物和反應物相比，質量發生了變化 這前後有了質量的虧損，虧損的質量以能量形式放出，而質量素有靜止能量之稱，著名的質能方程顯示了質量與能量的對應關係e mc 2。因此，核裂變有巨大能量釋放！核反應過程中釋放的能量是以...
鑽石戒指能改項鍊嗎,鑽石戒指能改項鍊嗎
鑽石戒指是不能能改項鍊。補充 鑽石是指經過琢磨的金剛石，在地球深部高壓 高溫條件下形成的一種由碳 c 元素構成，具有立方結構的天然白色晶體。鑽石具有宗教色彩的崇拜和畏懼，同時又把它視為勇敢 權力 地位和尊貴的象徵。現在已成為百姓們都可擁有 佩戴的大眾寶石。鑽石的文化源遠流長，也有人把它看成是愛情和忠...
鉑金吊墜能配別的項鍊嗎，鉑金項鍊能搭配銀的墜子嗎
最好配顏色相近的金屬項鍊，看上去協調。而且吊墜最好不要比項鍊重，因為項鍊要能支撐住吊墜。鉑金項鍊能搭配銀的墜子嗎?可以的。保持銀飾的乾燥，別戴著游泳，切勿接近溫泉和海水。每次佩戴完 後可用棉布或面紙輕拭表面，清除水份和汙垢，然後收藏於密封袋中，避免與空氣接觸。銀飾的最佳保養方法是天天佩戴，因人體油脂...