一大堆的福利之【USACO题库】 Number Triangles

最新推荐文章于 2021-06-30 10:23:37 发布

sss_brs

最新推荐文章于 2021-06-30 10:23:37 发布

阅读量330

点赞数

文章标签： Pascal 福利 OJ USACO

本文链接：https://blog.csdn.net/sss_brs/article/details/68076337

版权

题目描述

考虑在下面被显示的数字金字塔。

写一个程序来计算从最高点开始在底部任意处结束的路径经过数字的和的最大。

每一步可以走到左下方的点也可以到达右下方的点。

7

3 8

8 1 0

2 7 4 4

4 5 2 6 5

在上面的样例中,从7 到 3 到 8 到 7 到 5 的路径产生了最大和:30

PROGRAM NAME: numtri

INPUT FORMAT

第一个行包含 R(1<= R<=1000) ,表示行的数目。

后面每行为这个数字金字塔特定行包含的整数。

所有的被供应的整数是非负的且不大于100。

SAMPLE INPUT (file numtri.in)

5

7

3 8

8 1 0

2 7 4 4

4 5 2 6 5

OUTPUT FORMAT

单独的一行包含那个可能得到的最大的和。

SAMPLE OUTPUT (file numtri.out)

30

var
        i,j,n:longint;
        a,f:array[1..1000,1..1000]of longint;
function max(a,b:longint):longint;
begin
        if a>b then max:=a else max:=b;
end;
begin
        readln(n);
        for i:=1 to n do
                for j:=1 to i do
                        read(a[i,j]);
        for i:=1 to n do
                f[n,i]:=a[n,i];
        for i:=n-1 downto 1 do
                for j:=i downto 1 do
                        f[i,j]:=max(f[i+1,j],f[i+1,j+1])+a[i,j];
        write(f[1,1]);
end.