石头剪子布、水库、贪婪的送礼者 noip

P1019 石头剪子布 题目描述

现在有两个人在玩石头剪子布游戏，请你判断最后谁赢了。 用R代表石头，S代表剪子，P代表布。

输入

输入的第一行是一个整数t（0

接下来n行，每行由两个字母组成，两个字母之间用一个空格分隔，这些字母只会是R，S或P。

第一个字母表示Player1的选择，第二个字母表示Player2的选择。

输出

对于每组输入样例，输出获胜方的名字（Player1或Player2），如果平均，则输出TIE。

样例输入

3 2 R P S R 3 P P R S S R 1 P R

样例输出

Player 2 TIE

Player 1

P水库（递归）

题目描述

【问题描述】

西南有一个水水库！由于干旱出现了！每天抽水救灾100吨，水库每天自然出水30吨！这样过了n天后，水库还有s吨水！！问水库在干旱出现前有多少吨水？ 【输入格式】 2个正整数 【输出格式】 一个正整数 【输入样例】 12 1

【输出样例】 841

【数据规模】 3<=N<=40 0<=S<=100 【时间限制】 1S

P5162 Greedy Gift Givers 贪婪的送礼者

题目描述

1.1.2 Greedy Gift Givers 贪婪的送礼者

（gift1.pas/c/cpp）

题目描述

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

第 1 行: 人数NP,2<= NP<=10 ,

第 2 行 到 第NP+1 行:这NP个在组里人的名字 一个名字一行 ,

第NP＋2到最后： ,

这里的I段内容是这样组织的： ,

第一行是将会送出礼物人的名字。 ,

第二行包含二个数字: 第一个是原有的钱的数目（在0到2000的范围里），第二个 NGi 是将收到这个人礼物的人的个数 如果 NGi 是非零的, 在下面 NGi 行列出礼物的接受者的名字，一个名字一行。 ,

输出格式（gift1.out）输出 NP 行

每行是一个的名字加上空格再加上收到的比送出的钱多的数目。

对于每一个人，他名字的打印顺序应和他在输入的2到NP＋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

样例输出

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

参考程序： program p1019; var

t,n,i,r,sum1,sum2:longint; a,b,tmp:char;

function pd(p1,p2:char):integer; begin

if p1=p2 then pd:=0 else begin

if (p1='R') and (p2='S') or (p1='S') and (p2='P') or (p1='P') and (p2='R') then pd:=1 else pd:=2; end; end;

begin

readln(t); while(t>0) do begin dec(t); readln(n); sum1:=0; sum2:=0;

for i:=1 to n do begin

readln(a,tmp,b); r:=pd(a,b);

if r=1 then inc(sum1); if r=2 then inc(sum2); end;

if sum1>sum2 then writeln('Player 1') else if sum1

writeln('TIE') end; end.

program p25485; var

y,n,s:longint;

function dg(x:longint):longint; begin

if x=n+1 then dg:=s else

dg:=dg(x+1)+70; end; begin

readln(n,s); writeln(dg(1)); end.

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库石头剪子布、水库、贪婪的送礼者 noip在线全文阅读。