program SRP_GAME;

program SRP_GAME;
const
s1='Player one win!';
s2='Player two win!';
s3='No winner.';
var
p1,p2:integer;

procedure init(var x:integer);
var
t:char;
begin
readln(t);
case t of
'S': x:=1;
'R': x:=2;
'P': x:=3;
end;
end;


begin
write('Player one: ');
init(p1);
write('Player two: ');
init(p2);

case p1-p2 of
-2: writeln(s1);
-1: writeln(s2);
0: writeln(s3);
1: writeln(s1);
2: writeln(s2);
end;
end.

int YouXi(char Person1 ,char Person2)
{
if(Person1 == Person2)//如果两人一样，返回0.
return 0;
if(Person1 == 'S')
{
if(Person2 == 'R')
return 1;//2胜
else
return 2;//1胜
}
if(Person1 == 'R')
{
if(Person2 == 'P')
return 1;//2胜
else
return 2;//1胜
}
if(Person1 == 'P')
{
if(Person2 == 'S')
return 1;//2胜
else
return 2;//1胜
}

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息