石头剪子布
又称”猜丁壳”。是一种流传多年的猜拳游戏。起源传到日本、 朝鲜等地， 随着亚欧贸易的不断发展， 它传到了欧洲， 到了近现代逐渐风靡世界。
游戏规则：两个玩家先各自握紧拳头， 然后其中一人或者两人一起共同念出口令， 在说最后一个音节的同时， 两个玩家出示自己心中想好的手势（“石头” 、 “剪子”或“布”） 。
石头：握紧的拳头。
剪子：或称“剪刀”，中指和食指伸直，其余手指握紧。
布：五指伸直，张开手掌。手心向下，或向上，或竖直（拇指向上） 。
每一个手势代表一个“武器” ，互相克制的原则是：剪子剪不动石头（石头胜利） ；布被剪子剪开（剪子胜利） ；石头被布包裹（布胜利） 。如果双方出示了一样的手势，就是平局。
从表面上看，每次出拳的输赢是随机性的， 但是这不意味着石头剪子布就是一个无聊的游戏。其实，整个游戏过程中充满了 “心理博弈” ，单次的输赢可能更多取决于运气，但是多次比赛的话，赢家一定是个心理博弈的高手。
笑笑和乐乐决定玩这个游戏， 以证明谁是心理高手。

下面的程序是模拟两人 PK的情况，记剪子为 0，石头为 1，布为 2，共进行 n (n<=100)局。对于每一局，输入笑笑和乐乐各自的出法（输入两个整数 a、b） ，判断并累加每人的分数，胜者记 2 分，输者不记分，平局每人各记 1 分， 最后一行输出获胜方，‘XiaoXiao win’或‘LeLe win’或‘The same’ 。

program test6：
var  n,i,a,b,  numa, numb: integer: 
begin
  readln (n);
  for  i:=1 to n do  begin
    readln(a，b);
	if  a=b  then  begin
	  inc(numa)  ;
	 inc(numb);
	end
  else 
   case a of
  0: case b of
    1:numb：=numb+2;
    2：numa：=numa+2;
  end;
  1: case b of
   0:numa:=numa+2;
   2:numb:=numb+2;
  end;
  2:case b of
    0:numb:=numb+2;
    1:numa:=numa+2;
  end; 
  end; 
end;
if numa=numb then
  writeln('The same')
else if numa>numb  then
  writeln('XiaoXiao win')
else  writeln('LeLe win'); 
end.