求大神帮忙优化

譵之伤

1. .版本 2
   
2. 
   
3. .程序集 窗口程序集_启动窗口
   
4. .程序集变量 a, 整数型
   
5. .程序集变量 c, 双精度小数型
   
6. 
   
7. .子程序 _按钮1_被单击
   
8. .局部变量 b, 整数型
   
9. .局部变量 d, 双精度小数型
   
10. 
    
11. 列表框1.清空 ()
    
12. .计次循环首 (到数值 (编辑框1.内容), a)
    
13.     d ＝ 0
    
14.     .计次循环首 (a, b)
    
15.         c ＝ a ÷ b
    
16.         .如果真 (c ＝ 取整 (a ÷ b))
    
17.             d ＝ d ＋ 1
    
18.         .如果真结束
    
19.         .如果真 (d ＞ 2)
    
20.             跳出循环 ()
    
21.         .如果真结束
    
22. 
    
23.     .计次循环尾 ()
    
24.     .判断开始 (d ≤ 2)
    
25.         列表框1.加入项目 (到文本 (a), )
    
26.     .默认
    
27. 
    
28.     .判断结束
    
29. 
    
30. .计次循环尾 ()
    

复制代码

自己弄的一个质因数求值的


联系我时，请说是在 挂海论坛 上看到的，谢谢！

father

支持楼主，感谢楼主！

zxc120345427

哇哦好厉害！！！！！

狸子离

额 不会易语言

LanMao

虽然用不到 但是也要支持

father

66666666666666666666666666