这丑陋的代码

P1004 [NOIP2000 提高组] 方格取数

~~p党出身?~~
by 无意识躺枪人 @ 2019-01-24 21:09:18


@[scp_05_tqr](/space/show?uid=117842) P党代码也不是都有倾斜美 比如我的: ``` var n,t,i,j,k,l,x,y,z:longint; a:array[0..50,0..50] of longint; f:array[-1..51,-1..51,-1..51,-1..51] of longint; function max(x,y:longint):longint; begin if x>y then exit(x) else exit(y); end; begin readln(n); readln(x,y,z); fillchar(f,sizeof(f),0); while x*y*z<>0 do begin a[x,y]:=z; readln(x,y,z); end; for i:=1 to n do for j:=1 to n do for k:=1 to n do for l:=1 to n do begin t:=0; t:=max(t,f[i-1,j,k-1,l]); t:=max(t,f[i,j-1,k,l-1]); t:=max(t,f[i-1,j,k,l-1]); t:=max(t,f[i,j-1,k-1,l]); f[i,j,k,l]:=t+a[i,j]; if (i<>k) and (j<>l) then inc(f[i,j,k,l],a[k,l]); end; writeln(f[n,n,n,n]); end. ```
by Celestial_Scarlet @ 2019-01-24 21:20:34


应当说是我的码风毒瘤了,我还是认识几位码风很好的大佬的
by Celestial_Scarlet @ 2019-01-24 21:22:47


哈哈哈哈哈哈哈哈哈哈哈哈哈哈哈哈哈哈哈(笑出猪叫)
by 浅唱ヾ落雨殇 @ 2019-08-11 20:04:01


|