A certain integer n is a multiple of both 5 and 9. Must n be a multiple of 15？

淘汰赛问题

题目：

Our school is planning to hold a new exciting computer programming contest. During each round of the contest, the competitors will be paired, and compete head-to-head. The loser will be eliminated, and the winner will advance to next round. It proceeds until there is only one competitor left, who is the champion. In a certain round, if the number of the remaining competitors is not even, one of them will be chosed randomly to advance to next round automatically, and then the others will be paired and fight as usual. The contest committee want to know how many rounds is needed to produce to champion, then they could prepare enough problems for the contest.

Input

The input consists of several test cases. Each case consists of a single line containing a integer N - the number of the competitors in total. 1 ＜= N ＜= 2,147,483,647. An input with 0(zero) signals the end of the input, which should not be processed.

Output

For each test case, output the number of rounds needed in the contest, on a single line.

Sample Input

8

16

15

0

Sample Output

3

4

4

A、Sub f1(ByVal n(2) As Integer)

B、Sub f1(ByVal n() As Integer) As Integer

C、Function f1(ByVal f1 As Integer) As Integer

D、Function f1(ByVal n As Integer)

下列子过程语句中正确的是 A.Sub f1(By Val()As Integer) B.Sub f1(n()As Integer)As Integer C.Function f1(f1 As Integer)As Integer D.Function f1(By Val f As Integer)

A、Dim A() As Integer

B、Private A(n) As Integer

C、ReDim A() As Integer

D、Dim A(0 To 5) As Integer

A、Sub Para(ByVal n as integer )

B、Sub Para(byref n as integer) As Integer

C、Function Para(ByVal n as integer)as integer

D、Function Para(proc1) as integer

A.Dim a[2,4] As Integer

B.Dim a（2,4） As Integer

C.Dim a（n,n） As Integer

D.Dim a（2 4） As Integer

下列过程语句中正确的是()。

A．Sub fl(By Val () As Integer)

B．Sub fl(n() As Integer)As Integer

C．Function fl(fl As Integer)As Integer

D．Function fl(By Val f As Integer)

下列子过程语句中正确的是()。

A．Sub f1(ByVal() As Integer)

B．Sub f1(n() As Integer)As Integer

C．Function f1(f1 As Integer)As Integer

D．Function f1(ByVa1 f as Integer)

A、Sub S1(ByRef n%) As Integer

B、Sub S1%(ByVal n As Integer)

C、Sub S1(ByVal n%) As Integer

D、Sub S1(ByVal n%)

E、Sub S1(ByRef n As Integer)