标题:怎么都没人帮忙解决问题吗?
只看楼主
正在学习
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-12-16
 问题点数:0 回复次数:3 
怎么都没人帮忙解决问题吗?
请帮我把这个原代码,做下编程思路和程序分析 ,最好逐条分析,在这里谢谢大家了,我很着急,希望大家帮帮忙
SET TALK OFF
CLEAR
INPUT "输入数的个数n=" to n
DIMENSION x(n)
FOR i=1 TO n
input "第"+STR(i,4)+"个数=" to x(i)
ENDFOR
?
??"输入的顺序:"
FOR i=1 TO n
??x(i)
endfor
a=x(1,1)
?
*|*输入部分
FOR j=2 TO n
 FOR w=2 TO n
 IF x(w)>=x(w-1)
 a=x(w-1)
 x(w-1)=x(w)
 x(w)=a
 endif
 endfor
ENDFOR
*|*判断大小部分
?
??"大到小顺序:"
FOR i=1 TO n
??x(i)
ENDFOR
*|*输出大小部分
?
??"小到大顺序:"
FOR i=1 TO n
??x(n-i+1)
ENDFOR
*|*输出小大部分
?
??"大小大顺序:"
FOR i=1 TO n STEP 2
??x(i)
ENDFOR
IF MOD(n,2)=0
FOR i=n TO 2 STEP -2
??x(i)
ENDFOR
ELSE
FOR i=n-1 TO 2 STEP -2
??x(i)
ENDFOR
endif
SET TALK ON
搜索更多相关主题的帖子: FOR endfor TALK 
2007-12-16 14:18
9968590
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2007-12-16
得分:0 
自己解决
见意找本书或网上下个中文帮助一个命令一个命令的查!
2007-12-16 14:50
正在学习
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-12-16
得分:0 
帮帮我吧
2007-12-16 14:52
szwujq
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2007-12-17
得分:0 
就是一个对输入的数据排序并输出的程序
1、
FOR j=2 TO n
FOR w=2 TO n
IF x(w)>=x(w-1)
a=x(w-1)
x(w-1)=x(w)
x(w)=a
endif
endfor
ENDFOR
对数组中的数据比较进行排序,从大到小.
2、最后只对数组中处于双数位置的进行输出
2007-12-17 11:03



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-192768-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.599930 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved