简单的排序程序为什么排出来的数据有好几个都重复了，然后有些密友了

nathalie

求助大神，时间太紧了。。自己看程序真的怎么看都对的啊程序 ：        do i=1,nz                pp(i)=zongl(i)
                ii(i)=pingj(i)
                nn(i)=rmax(i)
        enddo
（这里已经算过pp,ii,nn都是正确的）

        do j=2,nz
                do i=j,nz
        if(pp(i).lt.pp(j-1))then
                        exchange=pp(j-1)
                        pp(j-1)=pp(i)
                        pp(i)=exchange
                endif
                enddo
        enddo

        do j=2,nz
                do i=j,nz
        if(ii(i).lt.ii(j-1))then
                        exchange=ii(j-1)
                        ii(j-1)=ii(i)
                        ii(i)=exchange
                endif
                enddo
        enddo

                do j=2,nz
                do i=j,nz
        if(nn(i).lt.nn(j-1))then
                        exchange=nn(j-1)
                        nn(j-1)=nn(i)
                        nn(i)=exchange
                endif
                enddo
        enddo
未排序之前和排序之后：

25.2	25.2
25.3	25.2
25.3	25.2
25.3	25.3
25.4	25.3
25.5	25.3
25.6	25.4
25.6	25.5
25.7	25.6
25.8	25.6
25.8	25.6
25.8	25.6
25.9	25.7
26	25.7
26	25.7
26.1	25.8
26.1	25.8
26.2	25.8
26.3	25.8
26.3	25.8
26.4	25.8
26.4	25.8
26.5	25.8
26.6	25.8
26.7	25.9
26.7	26
26.8	26
26.9	26
26.9	26
27	26.1
27.1	26.1
27.1	26.2
27.2	26.3
27.3	26.3
27.5	26.3
27.5	26.3
27.6	26.4
27.7	26.4
27.8	26.4
27.8	26.4
27.9	26.5
27.9	26.6
28	26.7
28	26.7
28.1	26.7
28.2	26.7
28.2	26.8
28.4	26.8
28.6	26.8
28.7	26.9
28.9	26.9
28.9	27
29	27
29	27
29.1	27.1
29.2	27.1
29.3	27.1
29.3	27.1
29.3	27.1
29.3	27.2
29.4	27.2
29.4	27.2
29.6	27.3
30.1	27.5
30.3	27.5
30.3	27.5
30.4	27.5
30.5	27.6
30.8	27.6
30.9	27.6
30.9	27.7
31.1	27.7
31.1	27.7
31.2	27.8
31.3	27.8
31.4	27.9
31.7	27.9
31.8	27.9
31.8	27.9
32	28
32.2	28
32.3	28
32.4	28
32.6	28
32.6	28.1
32.9	28.1
33	28.1
33.1	28.2
34	28.2
34.1	28.2
34.2	28.2
34.9	28.4
35.1	28.4
35.4	28.4
36.4	28.6
36.5	28.7
36.6	28.9
36.9	28.9
37.1	29
37.3	29
37.7	29
37.7	29
37.9	29.1
39.1	29.2
39.3	29.3
39.6	29.3
41.3	29.3
42.3	29.3
42.8	29.4
44.3	29.4
44.7	29.6
45.5	30.1
45.8	30.1
46.9	30.1
47.5	30.3
49.7	30.3
51	30.4
52.2	30.5
55.4	30.5
58.9	30.8
63.2	30.9
70	30.9
70.89999	30.9
112.4	31.1

nathalie

只贴了pp的计算结果

nathalie

外面有个站点的循环，第一个站点排出来是对。。第二个站点就开始错了