Luogu P3717 [AHOI2017初中组]cover

题目背景

以下为不影响题意的简化版题目。

题目描述

一个n*n的网格图上有m个探测器，每个探测器有个探测半径r，问这n*n个点中有多少个点能被探测到。

输入输出格式

输入格式：

第一行3个整数n,m,r

接下来m行，每行两个整数x,y表示第i个探测器的坐标

输出格式：

能被探测到的点的个数

输入输出样例

输入样例#1：

5 2 1
3 3
4 2

输出样例#1：

8

说明

1<=n,m<=100

Solution

水题……

既然是水题，也就没有多考虑就做了，可能时空复杂度不是最低的，但也不想管那么多了。（谁叫它数据范围那么小）

我的思路，直接读一个坐标就枚举网格图，有被探测器覆盖的点（不重复）就计数加1。

————————分割不完全的分割线————————

以下是pascal代码：

var n,m,i,j,k,l,r,x,y:longint;
b:array[1..100,1..100]of boolean;
begin
  readln(n,m,r);
  for k:=1 to m do
  begin
    readln(x,y);//读入坐标
    for i:=1 to n do
    for j:=1 to n do//枚举每个点
    if (abs(i-x)*abs(i-x)+abs(j-y)*abs(j-y)<=r*r)and(not b[i,j]) then//看那个点与探测器的距离是否在探测范围之内（且不重复）
    begin
      b[i,j]:=true;
      inc(l);//计数加一
    end;
  end;
  writeln(l);
end.