1樓：
program kc;
vark: integer;
d,d1: real;
oil, way: array [1 .. 10] of real;
i: integer;
begin
writeln(『no.』, 『distance』:30, 『oil』:80);
k := 1;
d := 500;
way[1] := 500;
oil[1] := 500;
repeat
k := k + 1;
d := d + 500 / (2 * k – 1);
way[k] := d;
oil[k] := oil[k – 1] + 500;
until d >= 1000;
way[k] := 1000;
d1 := 1000 – way[k – 1];
oil[k] := d1 * (2 * k + 1) + oil[k – 1];
for i := 0 to k do
writeln(i, 1000 – way[k – i]:30, oil[k – i]:80);
end.
2樓：
動態規劃，查一下『pascal加油問題』就有了 http://zhidao.baidu.
3樓：超級無敵
經典遞推 從終點往起點推 你試試看 這是基礎題
4樓：
你自己先學一學「動態規劃」再編就簡單多了，動態規劃很複雜，我就懶得現編了。
雙門吉普車都有哪些品牌,國產倆門的小吉普車是什麼牌子的？
國內市場常見的 鈴木吉姆尼 吉普牧馬人 三菱io 獵豹飛騰 鈴木超級維特拉兩門 飛碟ufo beijing b40 吉普車 轎車 麵包車都是一種叫法。你眼中的吉普車其實就是suv越野型車，吉普是越野車的代名詞，這類車有4 4，6 6的，也就是四驅和六驅，適合於越野行駛，一般個頭比轎車和麵包都大。比如...
女人看不起開吉普的男人嗎，開吉普車和越野車的男人是什麼性格？
喜歡人還是車？看人還是看車？像你這樣說，你是個另類的人，而你談的女孩是普通的女孩 想過普通生活的女孩 你的生活喜歡多彩，也許讓你活在這世上能活得精彩瀟灑，那麼少活幾年也無所謂 你給我的感覺是這樣的 也許正因為你一直生活得那麼好，一生出來就是衣來申手飯來張口，所以你長大了，你不滿足現在，而你接觸的人都...
吉普車和牧馬人有什麼區別
牧馬人是jeep旗下的一個系列車型，全稱 jeep 牧馬人。實際上，jeep是美國克萊斯勒公司旗下的一個越野車品牌商標，由於其是越野多功能車的始祖，所以jeep品牌被收入英文變成這類車型的代名詞。而原來國人對suv的概念，最早即 於英文jeep音譯 吉普 所以早年國人統稱suv車型為 吉普 例如北汽...