标签：
生活大爆炸版石头剪刀布
(rps.cpp/c/pas)
【问题描述】
石头剪刀布是常见的猜拳游戏：石头胜剪刀，剪刀胜布，布胜石头。如果两个人出拳一样，则不分胜负。在《生活大爆炸》第二季第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】
|
rps.in |
rps.out |
|
10 5 6 0 1 2 3 4 0 3 4 2 1 0 |
6 2 |
【输入输出样例2】
|
rps.in |
rps.out |
|
9 5 5 0 1 2 3 4 1 0 3 2 4 |
4 4 |
【数据说明】
对于100%的数据，0 < N ≤ 200，0 < NA ≤ 200， 0 < NB ≤ 200。
这样的话直接模拟每次猜拳的结果即可... 时间复杂度O(N),空间复杂度O(N)
然而在考场上脑洞有点大写了一个最小公倍数...没事反正AC就行...
时间复杂度O（lcm(NA,NB)）...
代码：
1 const 2 win:array[0..4,0..4]of boolean= 3 ((false,false,true,true,false), 4 (true,false,false,true,false), 5 (false,true,false,false,true), 6 (false,false,true,false,true), 7 (true,true,false,false,false)); 8 9 var 10 a,b:array[0..40001]of longint; 11 c:array[0..40001,1..2]of longint; 12 n,na,nb,nc,ans1,ans2,i,now:longint; 13 14 function gcd(x,y:longint):longint; 15 begin 16 if x mod y=0 17 then gcd:=y 18 else gcd:=gcd(y,x mod y); 19 end; 20 21 procedure read_ready; 22 begin 23 readln(n,na,nb); 24 for i:=1 to na do 25 read(a[i]); 26 for i:=1 to nb do 27 read(b[i]); 28 if na>nb 29 then nc:=gcd(na,nb) 30 else nc:=gcd(nb,na); 31 nc:=na*nb div nc; 32 for i:=1 to nc do 33 begin 34 a[i]:=a[(i-1) mod na+1]; 35 b[i]:=b[(i-1) mod nb+1]; 36 end; 37 end; 38 39 procedure chushihua; 40 begin 41 fillchar(a,sizeof(a),0); 42 fillchar(b,sizeof(b),0); 43 fillchar(c,sizeof(c),0); 44 ans1:=0;ans2:=0; 45 end; 46 47 procedure work; 48 begin 49 c[0,1]:=0;c[0,2]:=0; 50 for i:=1 to nc do 51 begin 52 c[i,1]:=c[i-1,1]; 53 c[i,2]:=c[i-1,2]; 54 if win[a[i],b[i]] then inc(c[i,1]); 55 if win[b[i],a[i]] then inc(c[i,2]); 56 end; 57 ans1:=(n div nc)*c[nc,1]; 58 ans2:=(n div nc)*c[nc,2]; 59 n:=n mod nc; 60 inc(ans1,c[n,1]); 61 inc(ans2,c[n,2]); 62 writeln(ans1,‘ ‘,ans2); 63 end; 64 65 begin 66 chushihua; 67 read_ready; 68 work; 69 end.
标签：
原文地址：http://www.cnblogs.com/kry-ssw-1314/p/4562095.html
