1，本命属猴 山下火命 是什麽意思

山下火即丙申的纳音。表示你生于丙申年，火猴年。

本命属猴 山下火命 是什麽意思

2，小学课文小猴子下山全文急啊啊

有一天，一只小猴子下山来。它走到一块玉米地里，看见玉米结得又大又多，非常高兴，就掰了一个，扛着往前走。 小猴子扛着玉米，走到一棵桃树下。它看见满树的桃子又大又红，非常高兴，就扔了玉米去摘桃子。 小猴子捧着几个桃子，走到一片瓜地里。它看见满地的西瓜又大又圆，非常高兴，就扔了桃子去摘西瓜。小猴子抱着一个大西瓜往回走。走着走着，看见一只小兔蹦蹦跳跳的，真可爱。它非常高兴，就扔了西瓜去追小兔。小兔跑进树林子，不见了。小猴子只好空着手回家去。 这个故事告诉我们，做事要认真，要有始有终 。
有一天，一只小猴子下山来。 它走到一块玉米地里，看见玉米结得又大又多， 非常高兴，就掰了一个，扛着往前走。 小猴子扛着玉米，走到一棵桃树下。它看见满树 的桃子又大又红，非常高兴，就扔了玉米去摘桃子。 小猴子捧着几个桃子，走到一片瓜地里。它看见满地的西瓜又大又圆，非常高兴，就扔了桃子去摘西瓜。 小猴子抱着一个大西瓜往回走。走着走着，看见一只小兔蹦蹦跳跳的，真可爱。它非常高兴，就扔了西瓜去追小兔。 小兔跑进树林子，不见了。小猴子只好空着手回家去。

小学课文小猴子下山全文急啊啊

3，PASCAL猴子下山

program p_1122; var a,b:array[1..100,1..100]of integer; i,j,k,n:integer; function f(p,q:integer):longint; var l1,l2:longint; begin if p=n then f:=a[p,q] else begin if b[p+1,q]=0 then begin l1:=f(p+1,q); b[p+1,q]:=l1; end else l1:=b[p+1,q]; if b[p+1,q+1]=0 then begin l2:=f(p+1,q+1); b[p+1,q+1]:=l2; end else l2:=b[p+1,q+1]; if l1>l2 then f:=l1+a[p,q] else f:=l2+a[p,q]; end; end; begin read(n); for i:=1 to n do for j:=1 to i do read(a[i,j]); writeln(f(1,1)); end.
用动态规划 var f:array[1..100,1..100,1..2] of longint; n:longint;procedure init;var i,j:longint;begin readln(n); for i:=1 to n do begin for j:=1 to i do begin read(f[i,j,1]); f[i,j,2]:=f[i,j,1]; end; readln; end;end; procedure dp;var i,j:longint;begin for i:=n-1 downto 1 do for j:=1 to i do if f[i+1,j,2]>f[i+1,j+1,2] then f[i,j,2]:=f[i,j,1]+f[i+1,j,2] else f[i,j,2]:=f[i,j,2]+f[i+1,j+1,2]; writeln(f[1,1,2]);end; begin while not eof do begin init; dp; end;end.
不能每层选最多 应由下向上推 不断重新赋值
每一层都选择最多的
var a,c:array[1..100,1..100]of integer; i,j,n:integer; begin readln(n); for i:=1 to n do begin for j:=1 to i do read(c[i,j]); readln; end; for i:=1 to n do begin a[n,i]:=c[n,i]; end; for i:=n-1 downto 1 do for j:=1 to i do if a[i+1,j]>a[i+1,j+1] then begin a[i,j]:=a[i+1,j]+c[i,j];end else begin a[i,j]:=a[i+1,j+1]+c[i,j];end; writeln(a[1,1]); end.

PASCAL猴子下山


文章TAG：猴子山下猴子  山下  属猴  
下一篇