fx5u写的100位数从小到大排序。申请加精!!! -凯发网址

hzy1818
级别: 家园常客
精华主题: 0
发帖数量: 455 个
工控威望: 624 点
下载积分: 1157 分
在线时间: 269(小时)
注册时间: 2007-08-30
最后登录: 2024-10-02
/
24楼  发表于: 2023-06-03 15:17
|
asdfg
385385
级别: 论坛先锋
精华主题: 0
发帖数量: 499 个
工控威望: 1219 点
下载积分: 38246 分
在线时间: 330(小时)
注册时间: 2017-01-21
最后登录: 2024-09-28
查看385385的 主题 / 回贴
25楼  发表于: 2023-06-08 15:51
|
谢谢分享
zl128828
级别: 略有小成
精华主题: 0
发帖数量: 352 个
工控威望: 445 点
下载积分: 1185 分
在线时间: 203(小时)
注册时间: 2018-02-01
最后登录: 2024-08-18
/
26楼  发表于: 2023-09-05 23:23
|
精华精华
source08
级别: 网络英雄
精华主题: 0
发帖数量: 538 个
工控威望: 6769 点
下载积分: 5634 分
在线时间: 208(小时)
注册时间: 2011-03-01
最后登录: 2024-10-08
查看source08的 主题 / 回贴
27楼  发表于: 2023-09-07 11:28
|
嵌套二层循环就可以了。
qq910877460
这操蛋的工控行业
级别: 略有小成
精华主题: 0
发帖数量: 90 个
工控威望: 244 点
下载积分: 3303 分
在线时间: 57(小时)
注册时间: 2014-05-20
最后登录: 2023-09-11
查看qq910877460的 主题 / 回贴
28楼  发表于: 2023-09-11 15:19
|
牛逼牛逼,马克了
操蛋的工控行业,为了碎银几两,又不得不搞它
发照片
问题少年
级别: 略有小成
精华主题: 0
发帖数量: 213 个
工控威望: 304 点
下载积分: 1532 分
在线时间: 69(小时)
注册时间: 2020-07-12
最后登录: 2024-09-28
/
29楼  发表于: 2023-09-15 15:08
|
if enable then
    if ldp(true,contentstart) then
        sortend:=false;
        zrst(true,dataout1[0],dataout1[29]);
        zrst(true,dataout2[0],dataout2[29]);
        zrst(true,datacontent_min[0],datacontent_min[29]);
        zrst(true,datacontent_max[0],datacontent_max[29]);
        data_i:=0;
        moveend:=true;
    end_if;
    if moveend then
        for data_i:=0 to datanumber-1 by 1 do
            datacontent_min[data_i]:=datacontent[data_i];  
            datacontent_max[data_i]:=datacontent[data_i];
        end_for;    
        sortstart:=true;
        moveend:=false;
    end_if;
    if sortstart then
        datanumber_i:=0;
        for datanumber_i:=0 to datanumber-2 by 1 do  
            datasort:=datanumber-(datanumber_i 1);
            for datasort_i:=0 to datasort-1 by 1 do
                if datacontent_min[datanumber_i datasort_i 1]<=datacontent_min[datanumber_i] then
                    datacontent_n_e_min:=datacontent_min[datanumber_i];
                    datacontent_s_e_min:=datacontent_min[datanumber_i datasort_i 1];
                    datacontent_min[datanumber_i]:=datacontent_s_e_min;
                    datacontent_min[datanumber_i datasort_i 1]:=datacontent_n_e_min;
                    dataout2[datanumber_i]:=datacontent_s_e_min;
                    dataout2[datanumber-1]:=datacontent_n_e_min;
                end_if;    
                if datacontent_max[datanumber_i datasort_i 1]>=datacontent_max[datanumber_i] then
                    datacontent_n_e_max:=datacontent_max[datanumber_i];
                    datacontent_s_e_max:=datacontent_max[datanumber_i datasort_i 1];
                    datacontent_max[datanumber_i]:=datacontent_s_e_max;
                    datacontent_max[datanumber_i datasort_i 1]:=datacontent_n_e_max;
                    dataout1[datanumber_i]:=datacontent_s_e_max;
                    dataout1[datanumber-1]:=datacontent_n_e_max;
                end_if;    
            end_for;    
        end_for;
        sortstart:=false;
        sortend:=true;
    end_if;
end_if;
chzhuhai
级别: 探索解密
精华主题: 0
发帖数量: 113 个
工控威望: 141 点
下载积分: 1123 分
在线时间: 52(小时)
注册时间: 2021-02-19
最后登录: 2024-09-11
/
30楼  发表于: 2023-09-22 08:27
|
谢谢分享
maxmmx
maxmmx
级别: 探索解密
精华主题: 0
发帖数量: 18 个
工控威望: 183 点
下载积分: 313 分
在线时间: 17(小时)
注册时间: 2007-11-20
最后登录: 2024-09-16
/
31楼  发表于: 2023-10-04 12:18
|
搜尋最大或最小值加上便址傳送並不難這種表格資料並不難,難的是你要如何將表格方式演化進去機械流程又不會異常
wu1111bin
12345
级别: 略有小成
精华主题: 0
发帖数量: 60 个
工控威望: 360 点
下载积分: 3504 分
在线时间: 39(小时)
注册时间: 2023-04-03
最后登录: 2024-09-11
/
32楼  发表于: 2023-10-06 15:41
|
bmov(true,d100,k20,d200);
d0:=k20;
  
for d2 := 0 to 19 by 1 do
    z0:=k0;
    z1:=k1;
    subp(true,d0, k1, d1);
    for d3 := 1 to d1 by 1 do
        if   d200z0>d200z1  then
            xch(true,d200z0,d200z1);
        end_if;
        inc(true,z0);
        inc(true,z1);
    end_for;
    dec(true,d0);
end_for;
;;
233708757
级别: 略有小成
精华主题: 0
发帖数量: 138 个
工控威望: 280 点
下载积分: 326 分
在线时间: 93(小时)
注册时间: 2008-03-04
最后登录: 2024-10-08
/
33楼  发表于: 2024-01-20 21:23
|
谢谢分享。。。。。。。
huzhouyang
级别: 正式会员
精华主题: 0
发帖数量: 41 个
工控威望: 64 点
下载积分: 1408 分
在线时间: 27(小时)
注册时间: 2021-09-02
最后登录: 2024-06-19
/
34楼  发表于: 2024-01-23 19:43
|
感谢分享
deamli
争做毛主席的好学生!
级别: 家园常客
精华主题: 0
发帖数量: 141 个
工控威望: 566 点
下载积分: 688 分
在线时间: 94(小时)
注册时间: 2023-03-28
最后登录: 2024-09-29
/
35楼  发表于: 76天前
|
牛逼,超赞!
没有一天不想努力破圈,然.........

    网站地图