洛谷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. 

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

转载于:https://www.cnblogs.com/yzm10/p/4753892.html

相关资源：各显卡算力对照表！