program Whiletest {


var param,  temp : int
var ulam : bool

param := 35;
ulam  := True;

while ulam do {
  if param = 1 then 
      ulam := False;
  if param != 1 then {
       print param;

       temp := param;
       while temp > 1 do
          temp := temp - 2;

       if temp = 0 then
            param := param / 2;
       if temp != 0 then
            param := 3 * param + 1
     }
  };

print ulam

}