射命丸文 (Standard IO)
生活随笔
收集整理的這篇文章主要介紹了
射命丸文 (Standard IO)
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
Description
在幻想鄉,射命丸文是以偷拍聞名的鴉天狗。當然,文文的照相機可不止能夠照相,還能夠消除取景框里面所有的彈幕。假設現在文文面前有一塊N行M列的彈幕群,每一個單位面積內有分值有num[i][j]的彈幕。相機的取景框可以將一塊R行C列的彈幕消除,并且得到這一塊區域內所有彈幕的分值(累加)。現在文文想要取得盡可能多的分值,請你計算出她最多能夠得到的分值。
Input
第1行:4個正整數N,M,R,C
第2..N+1行:每行M個正整數,第i+1行第j個數表示num[i][j]
Output
第1行:1個整數,表示文文能夠取得的最大得分
題解
預處理出每個點向左上方的和,然后暴力得正解。
如何求R,C的矩形呢?設預處理的數組為a,則(a[i,j]-a[i,j-r]-a[i-l,j]+a[i-l,j-r])就是了。
代碼
varn,m,l,r,ans:longint;a:array [0..1001,0..1001] of longint; procedure init; vari,j:longint; beginreadln(n,m,l,r);for i:=1 to n dobeginfor j:=1 to m doread(a[i,j]);readln;end;for i:=1 to n dofor j:=1 to m doa[i,j]:=a[i,j]+a[i-1,j]+a[i,j-1]-a[i-1,j-1]; end;function max(o,p:longint):longint; beginif o>p then exit(o);exit(p); end;procedure main; vari,j:longint; beginans:=0;for i:=l to n dofor j:=r to m doans:=max(ans,a[i,j]-a[i,j-r]-a[i-l,j]+a[i-l,j-r]);write(ans); end;begininit;main; end.轉載于:https://www.cnblogs.com/zyx-crying/p/9319609.html
總結
以上是生活随笔為你收集整理的射命丸文 (Standard IO)的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: Firefox Developer Ed
- 下一篇: css在盒子中垂直居中和固定居中