i := 0;
while (x>1) do
begin
  if (x mod 2 = 1) then
    x := 3*x+1
  else
    x := x div 2;
  inc(i);
end;
writeln(i); 

Jika x = 13, maka output dari program di atas adalah ....
A. 5
B. 6
C. 7
D. 8
E. 9