几个有意思的问题_第二弹

苏小脉

evolniar 发表于 2011-4-13 06:14
while ((n==9)||(n==15)||(n==25)||(n==21)||(n==27))
你不认为这种方法太机械了么。
改成 if (((i!=3)&& ...

为什么要这么做？学生是根据筛选表判断的：

1. 
   
2. # 如果 i 是质数
   
3. if (primes[i])
   
4.     // 筛选 i 的倍数
   
5.     ...
   

复制代码

心雪

1、

1. $gks = Win32API.new("user32","GetKeyState","l","i")
   
2. $a = $gks.call(123)
   
3. class << Graphics
   
4.   alias _heart_snow_update update
   
5.   def update
   
6.     if ($gks.call(123) != $a)
   
7.       exit
   
8.     end
   
9.     _heart_snow_update
   
10.   end
    
11. end
    

复制代码

2、

1. 
   
2. class Array
   
3.   def max
   
4.     max = self[0]
   
5.     for i in self
   
6.       if max < i
   
7.         max = i
   
8.       end
   
9.     end
   
10.     return i
    
11.   end
    
12. end
    
13. 
    
14. p [1,3,5,6,7].max

复制代码

3、好吧我承认我没研究出来

4、

1. 
   
2. class SpriteEX < Sprite
   
3.   def initialize
   
4.     super
   
5.     @sx = 0
   
6.     @sy = 0
   
7.   end
   
8.   def x
   
9.     return @sx
   
10.   end
    
11.   def y
    
12.     return @sy
    
13.   end
    
14.   def x=(x)
    
15.     @sx = x
    
16.     super(@sx)
    
17.   end
    
18.   def y=(y)
    
19.     @sy = y
    
20.     super(@sy)
    
21.   end
    
22. end
    
23. $abc = SpriteEX.new
    
24. $abc.bitmap = RPG::Cache.icon("001-Weapon01")
    
25. for i in 1..10
    
26.   $abc.x = 0.5 + $abc.x
    
27.   Graphics.update
    
28. end
    

复制代码

5、
nil.__send__("66")

6、理论神马的最讨厌了，明明p出来都是"method"
--------------------------
好吧我竟然忘了defined?也可以判断常量- -

7、

1. 
   
2. array_bitmaps = [RPG::Cache.icon("001-Weapon01"),RPG::Cache.icon("002-Weapon02"),RPG::Cache.icon("003-Weapon03")]
   
3. max = 0
   
4. maxi = 0
   
5. for i in 0...array_bitmaps.size
   
6.   bitmap = array_bitmaps[i]
   
7.   if bitmap.height * bitmap.width > max
   
8.     max = bitmap.height * bitmap.width
   
9.     maxi = i
   
10.   end
    
11. end
    
12. array_bitmaps[maxi].dispose
    
13. array_bitmaps[maxi] = nil
    
14. GC.start
    

复制代码

8、没时间了……DFS+剔除23在一起的情况

9、（请勿在RM中测试）

1. 
   
2. require "mathn.rb"
   
3. pr = Prime.new
   
4. pr.each{|v| break if v > 1000;p v ;}

复制代码

至于说算法……

1. #include<stdio.h>
   
2. char a[1001]={0};
   
3. int kill_number(long n)
   
4. {
   
5. int i = 2;
   
6. while(i*n <= 1000)
   
7. {
   
8. a[i*n] = 1;i++;
   
9. }
   
10. }
    
11. main()
    
12. {
    
13. long i,result = 0;
    
14. for(i=2;i<=1000;i++)
    
15. if(a[i] == 0)
    
16. kill_number(i);
    
17. for(i=2;i<=1000;i++)
    
18. if(a[i] == 0)
    
19. result++;
    
20. printf("%ld\n",result);
    
21. system("pause");
    
22. }
    
23. 
    

复制代码

时间原因先用以前写好的C语言的玩意吧……有时间再改成Ruby

为什么要追求一行代码呢～难道您打算参加国际Ruby混乱代码大赛？

苏小脉

回复 心雪 的帖子

4（实则是 5）、是 27°，不是 0° o_O

5（实则是 6）、这么写不会有 eval 的信息，得嵌两层 eval；

9、Prime.new 这个被废弃了，现代的程序应该使用单例 Prime.instance，其余所有实例方法都提供了相应的类方法，如：Prime.each { ... }。

至于算法……不妨看看之前的讨论 OvO
空间方面其实只需要 ceil(1001/8) 个字节呢。

为什么要追求一行代码呢～难道您打算参加国际Ruby混乱代码大赛？

先生有所不知，当年 Perl 界有一个很有名的竞赛叫做 Perl Golf Apocalypse，其目的就是使用最少的 stroke 来写出一段程序，此处 stroke 同时有“高尔夫球挥杆”与“键击”之意，乃是双关语。后来的 Code Golf 就是基于经典的 Perl Golf 模式而出现的竞赛，其网站是 Rails 搭建的，引入了 Python、PHP 和 Ruby。Golfing 自由其乐趣，同时也是帮助了竞赛者掌握语言的接口。

心雪

手机没有回复功能……直接回这里吧……实则是5的问题他只说要增强精度而已嘛……那个角度只是引子不是么（强词夺理）实则是6，好吧我承认我没仔细看……
至于素数算法，用二进制的确可以优化空间复杂度，但是C没有bool类型，我又不熟悉位运算……
还有……先生这个称呼承担不起，咱只是个学生……而且请问您是如何判断咱的性别的呢=v=

心雪 发表于 2011-4-15 06:49
手机没有回复功能……直接回这里吧……实则是5的问题他只说要增强精度而已嘛……那个角度只是引子不是么（ ...

“先生”神马的只是为了符合上下文的样子（大雾）

苏小脉

回复 心雪 的帖子

但是C没有bool类型，我又不熟悉位运算……

其实 bool 也需要一个字节，关键在于位的操作。最好是用单个元素尽量大的数组，比如 32/64 位 int，使得每次位运算都能充分利用当前 CPU 架构下的最大的寄存器，减少内存操作次数，嘿嘿。

还有……先生这个称呼承担不起，咱只是个学生……而且请问您是如何判断咱的性别的呢=v=

先生只是对有学问者的通称，含敬意，并无年龄性别之分，呵呵~

fux2

@evolniar@苏小脉
用evoniar的代码测试了一下，输入25结果输出也包含25，显然有bug，只要输入数为奇数并且可以开方，就会输出这个数，作者是否需要修正一下，我想不需要咱提供方法吧。