洛谷 P1328 生活大爆炸版石头剪刀布

题目描述

石头剪刀布是常见的猜拳游戏：石头胜剪刀，剪刀胜布，布胜石头。如果两个人出拳一样，则不分胜负。在《生活大爆炸》第二季第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 。

分析：纯模拟，n才200。

代码：

const
d:array [0..4,0..4] of longint=((0,-1,1,1,-1),
(1,0,-1,1,-1),
(-1,1,0,-1,1),
(-1,-1,1,0,1),
(1,1,-1,-1,0));
var
a,b:array [0..201] of longint;
i,x,y,n,na,nb,e,f:longint;
begin
read(n,na,nb);
for i:=0 to na-1 do
read(a[i]);
for i:=0 to nb-1 do
read(b[i]);
for i:=0 to n-1 do
begin
e:=a[i mod na];
f:=b[i mod nb];
case d[e,f] of
1:x:=x+1;
-1:y:=y+1;
end;
end;
writeln(x,' ',y);
end.