要求使用者输入N个要排序的数，然后依次输入，最后输出从小到大排列的数。 举例： 请输入要输入数字的个数：N 请输入第一个数字：55 请输入第二个数字：21 请输入第三个数字：1 请输入第四个数字：44 请输入第N个数字：29 您所输入数字的顺序是：55，21，1，44，29 排序之后数字的顺序是：1，21，29，44，55 这是执行程序后的画面。还需要告诉我每一句的意思，用的什么命令，这一句执行哪一步等等，望高手不吝赐教。在这里先行谢过了！

看上去简单！有点难度！

难道没人会吗？苍天啊，大地阿，那位神仙帮帮我呀？

LOCAL ii=0input '输入参与排序个数： ' to iDIMENSION xx(i)j=1DO WHILE j<=i *input '第'+ALLTRIM(STR(j,3,0)+'排序数: 'to xx(j) input '第'+ALLTRIM(STR(j,3,0))+'排序数: 'to xx(j) j=j+1ENDdoASORT(xx)j=1DO WHILE j<=i IF j=1 ? xx(J) ELSE ?? xx(J) endif j=j+1ENDdo把它拷贝到sort.prg文件运行即可,不过这种程序没有应用用途,应付考试还可以。有问题多交流吧！

LOCAL ii=0input '输入参与排序个数： ' to iDIMENSION xx(i)j=1DO WHILE j<=i input '第'+ALLTRIM(STR(j,3,0))+'个排序数: 'to xx(j) j=j+1ENDdoASORT(xx)j=1DO WHILE j<=i IF j=1 ? xx(J) ELSE ?? ','+ALLTRIM(STR(xx(J),3,0)) endif j=j+1ENDdo

多谢大侠！我刚学Foxpro，所以还需请教两个问题：ALLTRIM(STR(j,3,0))和?? ','+ALLTRIM(STR(xx(J),3,0)) 啥意思？最后两句话怎么加上？

ALLTRIM(STR(j,3,0)) &&str(J,3,0)是输入第j次数转换成字符J<=999,alltrim 是去掉不足三位的空格。 ?? ','+ALLTRIM(STR(xx(J),3,0)) && ??是不换行紧紧显示。不知你运行成功没有，本人以运行成功了。你要只把第二次内容复制后，在FOXPRO下，用modi comm sotr1 命令后，将以上复制内容粘贴即可，保存后运行就得。如do sotr1

租用空间送网页设计！！！！！ 新春虚拟空间租用大促销活动期间空间价格优惠！　　　空间使用均免费测试使用3天，300--500兆均免费送　　　首页设计！　　　请需要者欲购从速！先到先得！赶快行动吧！详情请咨询0771-2822862

广西南宁浩宇广告公司提供网站建设、网站制作、网站空间 广西南宁浩宇广告公司是一间强调专业性与服务性完善结合的公司。公司拥有一支思路开阔、创造力强的专业团队，致力于网络广告经营、网页制作、网站建设推广运营等项目为主导的领域。业务范围： 1、网站制作 2、网络广告 3、网络视频 4、影视媒体 5、房地产推广 ６、媒体投放 ７、VI 设计 ８、标志设计 ９、画册设计 １０、包装设计 11、海报招贴 12、展示设计 13、专卖店设计 详情请登录：www.haoyuad.com 企业旗下网站：www.nnkx.com www.nninter.com 联系电话：0771-2822862 邮箱：[email protected] 或 [email protected]