随机数不规则-之规定分割。看有那位朋友能明白我意

bbs592

随机数不规则-之有规律的分割。看有那位朋友能明白我意.要是看不明白就问....


随机数：

618601288585880567724212824537686997776766514343618876254116546513113510335458784
61
--8
---60
-----12
-------8
--------8
---------58
-----------58
-------------8
--------------0
---------------56
-----------------7
------------------7
-------------------24
---------------------21
-----------------------如此分分割下去。

最大数为62
从第一组位数起：两位数算---如61有   （61860）
从第二组数：                 86大于62的话 就为8（61860）
  
关健的来了
  第三组数：                为60（61860）
  第四组又从                12为组 （6186012）

不知那位朋友能否看懂我意思？就是在10-62间的数为一组，大于62的数就取一位数。

yaoming110

bbs592 发表于 2013-5-30 23:47
随机数：618601288585880567724212824537686997776766514343618876254116546513113510335458784
--------6 ...

58 后面不是

1. .版本 2
   
2. 
   
3. .子程序 _按钮1_被单击
   
4. .局部变量 文本, 文本型
   
5. .局部变量 计次, 整数型
   
6. .局部变量 a, 整数型
   
7. .局部变量 长度, 整数型
   
8. .局部变量 b, 整数型
   
9. 
   
10. 文本 ＝ “61860128858588056772421282453768699777676651434361887625411654651311351033545878”
    
11. 长度 ＝ 取文本长度 (文本)
    
12. 
    
13. .计次循环首 (长度, 计次)
    
14.     b ＝ b ＋ 1
    
15.     .如果真 (b ＞ 长度)
    
16.         跳出循环 ()
    
17. 
    
18.     .如果真结束
    
19.     a ＝ 到整数 (取文本中间 (文本, b, 2))
    
20.     .如果 (a ＞ 62)
    
21.         a ＝ 到整数 (取文本中间 (文本, b, 1))
    
22. 
    
23.     .否则
    
24.         b ＝ b ＋ 1
    
25.     .如果结束
    
26. 
    
27.     输出调试文本 (a)
    
28. 
    
29. .计次循环尾 ()
    

复制代码

05 吗 ?小于62啊

bbs592

随机数：618601288585880567724212824537686997776766514343618876254116546513113510335458784
--------61
----------8
-----------60
-------------12
---------------8
----------------8
-----------------58
-------------------58
---------------------8
----------------------0
-----------------------56
-------------------------7
--------------------------7
---------------------------24
-----------------------------21
-------------------------------如此分分割下去。

skyflb

不懂~

yaoming110

这种和你要的一模一样

1. .版本 2
   
2. 
   
3. .子程序 _按钮1_被单击
   
4. .局部变量 文本, 文本型
   
5. .局部变量 计次, 整数型
   
6. .局部变量 a, 整数型
   
7. .局部变量 长度, 整数型
   
8. .局部变量 b, 整数型
   
9. 
   
10. 文本 ＝ “61860128858588056772421282453768699777676651434361887625411654651311351033545878”
    
11. 长度 ＝ 取文本长度 (文本)
    
12. 
    
13. .计次循环首 (长度, 计次)
    
14.     b ＝ b ＋ 1
    
15.     .如果真 (b ＞ 长度)
    
16.         跳出循环 ()
    
17. 
    
18.     .如果真结束
    
19.     .判断开始 (取文本中间 (文本, b, 1) ＝ “0”)
    
20. 
    
21.         输出调试文本 (“0”)
    
22. 
    
23. 
    
24.     .默认
    
25.         a ＝ 到整数 (取文本中间 (文本, b, 2))
    
26.         .如果 (a ＞ 62)
    
27.             a ＝ 到整数 (取文本中间 (文本, b, 1))
    
28.         .否则
    
29.             b ＝ b ＋ 1
    
30.         .如果结束
    
31. 
    
32.     .判断结束
    
33. 
    
34.     输出调试文本 (a)
    
35. 
    
36. .计次循环尾 ()
    

复制代码

乱花飞絮

我到底你没有看懂你是求助呢，还是要炫耀

电脑寄生虫

11.rar (1.31 KB, 下载次数: 2)

2013-5-31 13:50 上传

点击文件名下载附件