PML数组冒泡排序法

leorico

在写PML程序中用到比较复杂数组的排序，但是大概找了下帮助没有我想要的，就看了下之前的C#里面写过的冒泡排序，在PML中也写了下，有点意思

1. 
   
2. <P>--PML数组冒泡排序法
   
3. --09:07:40 PM, October 02, 2013, COSCO Shipyard_LiYuan.
   
4. !nums = array()
   
5. !nums.append(2)
   
6. !nums.append(12)
   
7. !nums.append(14)
   
8. !nums.append(14)
   
9. !nums.append(20)
   
10. !nums.append(1)
    
11. !nums.append(50)
    
12. !nums.append(99)
    
13. !nums.append(8)
    
14. !nums.append(30)</P>
    
15. <P>do !a to !nums.size()
    
16.    do !b to (!nums.size() - !a)
    
17.          if (!nums[!b] gt !nums[!b + 1]) then $* //升序排列, if (!nums[!b] lt !nums[!b + 1]) then //降序排列
    
18.               !temp = !nums[!b]
    
19.               !nums[!b] = !nums[!b + 1]
    
20.               !nums[!b + 1] = !temp
    
21.           endif
    
22.    enddo
    
23. enddo</P>
    
24. <P>q var!nums </P>

复制代码

C#中简单的冒泡

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.Linq;
   
4. using System.Text;
   
5. 
   
6. namespace Lx_array
   
7. {
   
8. class Program
   
9. {
   
10. static void Main(string[] args)
    
11. {
    
12. ShowUI();
    
13. int k = 1;
    
14. int[] nums = new int[10];
    
15. for (int i = 0; i <nums.Length; i++)
    
16. {
    
17. try
    
18. {
    
19. Console.Write("请输入第{0}/{1}个数字: ", i + 1,nums.Length);
    
20. nums[i] = Convert.ToInt32(Console.ReadLine());
    
21. }
    
22. catch
    
23. {
    
24. if (k < 3)
    
25. {
    
26. Console.WriteLine("输入的数据不合法, 请重新输入!");
    
27. i--;
    
28. k++;
    
29. }
    
30. else
    
31. {
    
32. Console.WriteLine("超过最大输入次数!");
    
33. goto Finish;
    
34. }
    
35. }
    
36. }
    
37. 
    
38. for (int n = 0; n <nums.Length; n++)
    
39. {
    
40. Console.WriteLine("第{0}/{1}个数字:{2} ", n + 1, nums.Length, nums[n]);
    
41. }
    
42. 
    
43. //数组元素冒泡排序
    
44. for (int g = 0; g < nums.Length - 1; g++)
    
45. {
    
46. for (int j = 0; j < nums.Length -g- 1; j++)
    
47. {
    
48. if (nums[j] < nums[j + 1])
    
49. {
    
50. int temp = nums[j];
    
51. nums[j] = nums[j + 1];
    
52. nums[j + 1] = temp;
    
53. }
    
54. }
    
55. }
    
56. for (int ii = 0; ii < nums.Length; ii++)
    
57. {
    
58. if (ii < nums.Length-1)
    
59. {
    
60. Console.Write("{0} > ", nums[ii]);
    
61. }
    
62. else
    
63. {
    
64. Console.Write(nums[ii]);
    
65. }
    
66. }
    
67. 
    
68. Finish:
    
69. Console.ReadKey();
    
70. ShowUI();
    
71. Console.ReadKey();
    
72. }
    
73. /// <summary>
    
74. /// 显示软件主界面的方法
    
75. /// </summary>
    
76. public static void ShowUI()
    
77. {
    
78. Console.Clear();
    
79. Console.WriteLine("**********************************************");
    
80. Console.WriteLine("** 冒泡排序 **");
    
81. Console.WriteLine("**********************************************");
    
82. Console.WriteLine("按任意键退出!");
    
83. //Console.ReadKey();
    
84. }
    
85. }
    
86. }

复制代码

烟雨江南

PML的数组排序用Sort方法就可以了吧。
!nums.sort()

zhj2387

支持下

leorico

[mw_shl_code=applescript,true]do !a to !ncorrectname.size()
        do !b to (!ncorrectname.size() - !a)
                if (!ncorrectname[!b][1] gt !ncorrectname[!b + 1][1]) then
                        !tempa = !ncorrectname[!b][1]
                        !tempb = !ncorrectname[!b][2]
                        !ncorrectname[!b][1] = !ncorrectname[!b + 1][1]
                        !ncorrectname[!b][2] = !ncorrectname[!b + 1][2]
                        !ncorrectname[!b + 1][1] = !tempa
                        !ncorrectname[!b + 1][2] = !tempb
                endif
        enddo
enddo[/mw_shl_code]

xcp417

放着sort（）不用，浪费生命，还这么嘚瑟。。。