BZOJ1666: [Usaco2006 Oct]Another Cow Number Game 奶牛的数字游戏

1666: [Usaco2006 Oct]Another Cow Number Game 奶牛的数字游戏

Time Limit: 5 Sec  Memory Limit: 64 MB
Submit: 502  Solved: 432
[Submit][Status]

Description

奶牛们又在玩一种无聊的数字游戏。输得很郁闷的贝茜想请你写个程序来帮她在开局时预测结果。在游戏的开始,每头牛都会得到一个数N(1<=N<=1,000,000)。此时奶牛们的分数均为0。如果N是奇数,那么奶牛就会把它乘以3后再加1。如果N是偶数,那么这个数就会被除以2。数字每变动一次,这头奶牛就得到1分。当N的值等于1时,游戏结束,此时的分数就是这头奶牛在这局游戏中的最终得分。 以下是N的初始值为5时,一局游戏的完整过程: N 操作后所得数 注释 总分 5 16 3*5+1 1 16 8 16/2 2 8 4 8/2 3 4 2 4/2 4 2 1 2/2 5 这头奶牛的最终得分是5。

Input

* 第1行: 一个正整数,N

Output

* 第1行: 输出一个正整数N,即奶牛在这局游戏中的最终得分

Sample Input

112

Sample Output

20

HINT

 

Source

Gold

题解:

3n+1问题。。。

代码:
 1 var n,ans:longint;
 2 begin
 3   assign(input,'input.txt');assign(output,'output.txt');
 4   reset(input);rewrite(output);
 5   readln(n);ans:=0;
 6   while n<>1 do
 7    begin
 8      inc(ans);
 9      if odd(n) then n:=3*n+1 else n:=n>>1;
10    end;
11   writeln(ans);
12   close(input);close(output);
13 end.      
View Code

 

 
posted @ 2014-08-12 16:31  ZYF-ZYF  Views(128)  Comments(0Edit  收藏  举报