洛谷1201 贪婪的送礼者 解题报告

洛谷1201 贪婪的送礼者

本题地址： http://www.luogu.org/problem/show?pid=1201

题目描述

对于一群（NP个）要互送礼物的朋友，GY要确定每个人送出的钱比收到的多多少。在这一个问题中，每个人都准备了一些钱来送礼物，而这些钱将会被平均分给那些将收到他的礼物的人。然而，在任何一群朋友中，有些人将送出较多的礼物(可能是因为有较多的朋友)，有些人有准备了较多的钱。给出一群朋友，没有人的名字会长于 14 字符，给出每个人将花在送礼上的钱，和将收到他的礼物的人的列表，请确定每个人收到的比送出的钱多的数目。

输入输出格式

输入格式：

第 1 行: 人数NP,2<= NP<=10 
第 2 行 到 第NP+1 行:这NP个在组里人的名字　一个名字一行
第NP＋2到最后：
这里的I段内容是这样组织的：
第一行是将会送出礼物人的名字。
第二行包含二个数字:　第一个是原有的钱的数目（在0到2000的范围里），第二个 NGi 是将收到这个人礼物的人的个数 如果 NGi 是非零的, 在下面 NGi 行列出礼物的接受者的名字，一个名字一行。

输出格式：

输出 NP 行 
每行是一个的名字加上空格再加上收到的比送出的钱多的数目。
对于每一个人，他名字的打印顺序应和他在输入的2到NP＋1行中输入的顺序相同。所有的送礼的钱都是整数。
每个人把相同数目的钱给每位要接受礼物的朋友，而且尽可能多给，不能给出的钱由送礼者本人持有。

输入输出样例

输入样例#1：

5
dave
laura
owen
vick
amr
dave
200 3
laura
owen
vick
owen
500 1
dave
amr
150 2
vick
owen
laura
0 2
amr
vick
vick
0 0

输出样例#1：

dave 302
laura 66
owen -359
vick 141
amr -150

说明

题目翻译来自NOCOW。
USACO Training Section 1.1

题解

模拟+字符串

充满陷阱的一道题。。。

这道题的字符串显然需要用数组来存储。

我们需要将每个人按一定顺序读入（输出的顺序同样如此）。

然后罗列出每个人的送礼情况。特别特别注意（陷阱1）：这里的顺序将不一定是先前读入的顺序（需要比较来确定）。

送出礼物的钱为整除后的数目，余数则是归送礼者持有。特别特别注意（陷阱2）：当除数为0时无意义（需要特判）。

最后按读入顺序输出结果（每个人最初的钱数为0，最终可能为负）。

下面附上代码。

代码

var
  n,x,y,i,j,k,l:longint;
  z,zz:string;
  a:array[1..10] of string;
  b:array[1..10] of longint;
begin
  readln(n);
  for i:=1 to n do
    readln(a[i]);
  for l:=1 to n do
    begin
      readln(zz);
      for i:=1 to n do
        if zz=a[i] then break;
      readln(x,y);
      if y<>0 then dec(b[i],x-(x mod y));
      for j:=1 to y do
        begin
          readln(z);
          for k:=1 to n do
            if z=a[k] then inc(b[k],x div y);
        end;
    end;
  for i:=1 to n do
    writeln(a[i],' ',b[i]);
end.

（本文系笔者原创，未经允许不得转载）