program reversed_string;

var s1,s2 :string;

begin
readln(s1);

   case s1 of
'two':   s2:='2';
'three': s2:='3';
'four':  s2:='4';
   end;

writeln(s2);
readln;
end.