瑞星卡卡安全论坛

对字符串按每隔n个字符届取一个字符的规则将所得的字符组成一个新串，当剩余字任不足nn个时重新从首字符按规则继续届直到原字符为空最后输出新串。如输入abcdefg,3则输出dafegcb
程序如下：看看哪有问题，帮忙改正，不胜感激！！！1
input a$,n
l=len (a$)
dim a$(l)
i=0
do
i=i+1
a$(i)=mid$(a$,n+1,1)
l=l-1
a1$=mid$(a$,n+1,l-n)
a2$=mid$(a$,1,n)
a$-a1$+a2$
loop until a$=""
for i=1 to l
print a$(i)
next i
end

a$-a1$+a2$  是怎么回事？是不是 a$=a1$+a2$ 啊？

错的很多啊！

前面 4 行和最后一行是可以的，其它就没办法看了。

就说最后的输出吧，这本来是最简单的了。
那个 l 原来是 7，可是，你 do 一次就减一次 1，
do 完了你还能 for i=1 to l 啊?

实话说，你是刚刚学的吧？这个题目对初学者有点难了。

我QB不错