热心网友
回答时间:2025-02-06 20:38
1.S="ABCDE"
J=LEN(S) &&S的长度,即字符的位数,这里j=5
DO WHILE J>0 &&J>0时循环执行
?SUBSTR(S,6-J) &&S从6-j位开始取子串,第一次是6-j=1,所以结果是ABCDE,第二次j=3,所以结果是CDE,第三个循环J=1,结果是E
J=J-2 &&j=5,j=3,j=1
ENDDO
RETURN
2.S="123456"
J=LEN(S) &&j=6
DO WHILE J>0
?SUBSTR(S,6-J) &&j=6时对S从6-j即第0位开始截取子串,结果位空,第二次j=5,6-j=1,从第一位截取S,结果为123456;第三次j=4,6-j=2,结果位23456.。。。。。。
J=J-1 &&j=6,5,4,3,2,1
ENDDO
RETURN
3.CLEAR
FOR I=5 TO 1 STEP -1 &&i=5,4,3,2,1
@10-I,10 SAY REPLICATE('&',I) &&生成含有I个“&”字符的字符串
ENDFOR
收起