标签:
石头剪刀布是常见的猜拳游戏:石头胜剪刀,剪刀胜布,布胜石头。如果两个人出拳一样,则不分胜负。在《生活大爆炸》第二季第8 集中出现了一种石头剪刀布的升级版游戏。
升级版游戏在传统的石头剪刀布游戏的基础上,增加了两个新手势:
斯波克:《星际迷航》主角之一。
蜥蜴人:《星际迷航》中的反面角色。
这五种手势的胜负关系如表一所示,表中列出的是甲对乙的游戏结果。
现在,小A 和小B 尝试玩这种升级版的猜拳游戏。已知他们的出拳都是有周期性规律的,但周期长度不一定相等。例如:如果小 A以“石头 - 布- 石头- 剪刀- 蜥蜴人- 斯波克”长度为6 的周期出拳,那么他的出拳序列就是“石头- 布- 石头- 剪刀- 蜥蜴人- 斯波克- 石头- 布- 石头- 剪刀- 蜥蜴人- 斯波克- ……”,而如果小B 以“剪刀- 石头- 布- 斯波克- 蜥蜴人”长度为5 的周期出拳,那么他出拳的序列就是“剪刀- 石头- 布- 斯波克- 蜥蜴人- 剪刀- 石头- 布-斯波克- 蜥蜴人- ……”
已知小A 和小B 一共进行N 次猜拳。每一次赢的人得1 分,输的得0 分;平局两人都得0 分。现请你统计N 次猜拳结束之后两人的得分。
输入格式:
输入文件名为rps.in。
第一行包含三个整数:N ,NA,NB,分别表示共进行 N 次猜拳、小 A 出拳的周期长度,小B 出拳的周期长度。数与数之间以一个空格分隔。
第二行包含NA个整数,表示小 A 出拳的规律,第三行包含NB个整数,表示小 B 出拳的规律。其中,0 表示“剪刀”,1 表示“石头”,2 表示“布”,3 表示“蜥蜴人”, 4 表示“斯波克”。数与数之间以一个空格分隔。
输出格式:
输出文件名为rps.out 。
输出一行, 包含两个整数,以一个空格分隔,分别表示小A 、小B 的得分。
输入样例#1:
10 5 6 0 1 2 3 4 0 3 4 2 1 0
输出样例#1:
6 2
输入样例#2:
9 5 5 0 1 2 3 4 1 0 3 2 4
输出样例#2:
4 4
对于100%的数据,0 < N ≤ 200 ,0 < NA ≤ 200 , 0 < NB ≤ 200 。
这个题网上给出了三种解法,用数组做的是文艺青年,用循环做的事普通青年,用if过的是逗比青年,很不幸,我是第三类
1 program Left; 2 var 3 a,b:array[1..200] of longint; 4 n,na,nb,c1,c2,sum1,sum2,sum,i:longint; 5 begin 6 read(n,na,nb); 7 for i:=1 to na do read(a[i]); 8 for i:=1 to nb do read(b[i]); 9 sum:=0; 10 while sum<n do 11 begin 12 inc(sum); 13 if sum mod na <>0 then c1:=a[sum mod na] else c1:=a[na]; 14 if sum mod nb <>0 then c2:=b[sum mod nb] else c2:=b[nb]; 15 if c1=c2 then continue; 16 if ((c1=0) and(c2=2)) or 17 ((c1=0) and(c2=3)) or 18 ((c1=1) and(c2=0)) or 19 ((c1=1) and(c2=3)) or 20 ((c1=2) and(c2=1)) or 21 ((c1=2) and(c2=4)) or 22 ((c1=3) and(c2=4)) or 23 ((c1=3) and(c2=2)) or 24 ((c1=4) and(c2=0)) or 25 ((c1=4) and(c2=1)) then inc(sum1) 26 else inc(sum2); 27 end; 28 writeln(sum1,‘ ‘,sum2); 29 end.
标签:
原文地址:http://www.cnblogs.com/wuminyan/p/4746286.html