三次动态地从右向左显示变量S内容的字幕程序:
CLEAR
S-SPACE(80)+“热烈庆祝北京审半2008年奥运会成功!热烈呼唤!!”+SPACE(60)
N-O
______
I=1
DO WHILE 1<160
@20,0 SAY SUBSTR(S,I,80)
H=INKEY(0,1，”H”)
I=1+2
______
______
ENDDO

【参考答案】

D0 WH几E N<3 ENDDO N=N+1