题目46：最小的不能写作一个质数与一个平方数的二倍之和的奇合数是多少？

渡风

此代码使用matlab编程
Problem46所用时间为1.052秒
Problem46的答案为5777

1. %% Problem46.m
   
2. %最后编辑时间：2017-06-13 11:00 版本1.0
   
3. %找出第一个奇合数，使得其不能被一个质数和一个数平方的两倍的和表示
   
4. 
   
5. % Problem46所用时间为1.052秒
   
6. % Problem46的答案为5777
   
7. 
   
8. function Output = Problem46()
   
9. tic
   
10. Start = 35;
    
11. Judge = 1;
    
12. while (Judge == 1)
    
13.     Start = Start + 2;
    
14.     Judge =  P64(Start);
    
15. end
    
16. 
    
17. Output = Start;
    
18. toc
    
19. 
    
20. disp('此代码使用matlab编程')
    
21. disp(['Problem46所用时间为',num2str(toc),'秒'])
    
22. disp(['Problem46的答案为',num2str(Output)])
    
23. end
    
24. % 输入一个奇合数，判断其能不能被一个质数和令一个数平方的和；
    
25. function Judge = P64(n)
    
26. if nargin == 0
    
27.     n = 31;
    
28. end
    
29. Judge = 0;
    
30. if isprime(n) == 1
    
31.     Judge = 1;
    
32. else
    
33.     for ii = 3 : 2 : n-2
    
34.         if sqrt((n - ii)/2 ) ==  floor(sqrt((n - ii)/2 ))
    
35.             if  isprime(ii) == 1
    
36.                 Judge = 1;
    
37.                 break
    
38.             end
    
39.         end
    
40.     end
    
41. end
    
42. end

复制代码