Program TuKpa6;
var
x,y,z,sum:integer;
BEGIN
writeln('BBeguTe nepBoe 4ucJlo');
readln(x);
writeln('BBeguTe BTopoe');
readln(y);
writeln('BBeguTe TpeTue');
readln(z);
sum:=0;
if (x=y) and (x=z) then
  begin
    sum:=3;
    writeln(sum, ' oguHakoBbIx');
  end
else if (y=z) then
  begin
    sum:=2;
    writeln(sum, ' oguHakoBbIx');
  end
else
  begin
    writeln('HeT oguHakoBbIx');
  end;
END.