2.1
为什么要用动态规划法解题
首先,看下面一个问题: 1458
【例题1】数字三角形问题。
7
3 8
8 1 0
2 7 7 4
5 5 2 6 5
示出了一个数字三角形宝塔。数字三角形中的数字为不超过100的正整数。现规定从最顶层走到最底层,每一步可沿左斜线向下或右斜线向下走。假设三角形行数≤100,编程求解从最顶层走到最底层的一条路径,使得沿着该路径所经过的数字的总和最大,输出最大值。输人数据:由文件输入数据,文件第一行是三角形的行数N。以后的N行分别是从最顶层到最底层的每一层中的数字。
如输入:
5
7
3 8
8 1 0
2 7 7 4
4 5 2 6 5
输出:30
i,j,k,n,m:longint;
a,txt:array[0..101,0..101]of longint;
begin
readln(n);
for i:=1 to n do
for j:=1 to i do
begin
read(a[i,j]);
end;
for i:=1 to n do
txt[n,i]:=a[n,i];
for i:=n-1 downto 1 do
for j:=1 to i do
if txt[i+1,j+1]<txt[i+1,j] then txt[i,j]:=a[i,j]+txt[i+1,j]
else txt[i,j]:=a[i,j]+txt[i+1,j+1];
writeln(txt[1,1]);
end.