var rand,n:integer;
f:text;
begin
assign(f,'stones.dat');
reset(f);
read(f,n);
randomize;
rand:=random(2);
case rand of
0:write(f,'1 igrok hodit');

1:write(f,'2 igrok hodit');
end;

readln;
end.