描述
随着智能手机的日益普及,人们对无线网的需求日益增大。某城市决定对城市内的公共场所覆盖无线网。
假设该城市的布局为由严格平行的 129 条东西向街道和 129 条南北向街道所形成的网格状,并且相邻的平行街道之间的距离都是恒定值 1 。东西向街道从北到南依次编号为0,1,2…128,南北向街道从西到东依次编号为 0,1,2…128。
东西向街道和南北向街道相交形成路口,规定编号为 x 的南北向街道和编号为 y 的东西向街道形成的路口的坐标是(x, y)。在某些路口存在一定数量的公共场所。
由于政府财政问题,只能安装一个大型无线网络发射器。该无线网络发射器的传播范围是一个以该点为中心,边长为 2*d 的正方形。传播范围包括正方形边界。
例如下图是一个 d = 1 的无线网络发射器的覆盖范围示意图。
现在政府有关部门准备安装一个传播参数为 d 的无线网络发射器,希望你帮助他们在城 市内找出合适的安装地点,使得覆盖的公共场所最多。
格式
输入格式
第一行包含一个整数 d,表示无线网络发射器的传播距离。
第二行包含一个整数 n,表示有公共场所的路口数目。
接下来 n 行,每行给出三个整数 x, y, k, 中间用一个空格隔开,分别代表路口的坐标(x, y)以及该路口公共场所的数量。同一坐标只会给出一次。
输出格式
输出一行,包含两个整数,用一个空格隔开,分别表示能覆盖最多公共场所的安装地点方案数,以及能覆盖的最多公共场所的数量。
限制
对于 100%的数据,1 ≤ d ≤ 20,1 ≤ n ≤ 20, 0 ≤ x ≤ 128, 0 ≤ y ≤ 128, 0 < k ≤ 1,000,000。
枚举每个点的所能覆盖的公共场所数量记录最大值并维护个数
输出结束就可以了。
type nono=record
k:longint;(k为每个点的公共场所数量)
s:int64;(s为能覆盖的公共场所数量)
end;
var
a:array[0..128,0..128] of nono;
s:longint;最大值的个数
max:longint;最大值
i,j,k,n,m,b,c,q1,q2,p1,p2,d,x,y:longint;
procedure judge(x,y:longint);计算每个点的公共场所数量
begin
b:=x;c:=y;
q1:=b+d;这四条计算覆盖的公共厕所的边界 q1 q2 为横坐标边界 p1 p2 为纵坐标边界
q2:=b-d;
p1:=c+d;
p2:=c-d;
if (q1>128) then判断是否超界
begin
q1:=128;
end;
if (q2<0) then
begin
q2:=0;
end;
if (p1>128) then
begin
p1:=128;
end;
if (p2<0) then
begin
p2:=0;
end;
for k:=q2 to q1 do 计算该点能覆盖的公共厕所的数量
for m:=p2 to p1 do
a[b,c].s:=a[b,c].s+a[k,m].k;
if a[x,y].s>max then与最大值进行比较
begin
max:=a[x,y].s;如果大于最大值 s重新计数
s:=1;
end
else
if a[x,y].s=max then s:=s+1;如果等于最大值 s+1
end;
begin
assign(input,'wireless.in');
assign(output,'wireless.out');
reset(input);
rewrite(output);
readln(d);
readln(n);
fori:=1 to n do读入n个点的公共场所数量
begin
readln(x,y,k);
a[x,y].k:=k;
end;
fori:=0 to 128 do计算每个点所能覆盖的公共场所数量
for j:=0 to 128 do
judge(i,j);
writeln(s,' ',max);输出结束
close(input);
close(output);
end.