四、程序閱讀題。閱讀下列程序，寫出運行結果。

　　1、注：字符"A"的ASCII碼為65。

　　程序代碼：

　　SET TALK OFF

　　CLEAR

　　C="一二三四五六七八九十"

　　B="ABCD"

　　R=0

　　L=LEN(B)

　　FOR I=1 TO L

　　W=SUBSTR(B,I,1)

　　D=ASC(W)+R-65

　　S=""

　　IF D<10

　　S=SUBSTR(C,2*D+1,2)

　　ELSE

　　S=SUBSTR(C,2*MOD(D,10)+1,2)

　　ENDIF

　　?W+"----->"+S

　　R=R+11

　　ENDFOR

　　SET TALK ON

　　參考答案：

　　A---->一

　　B---->三

　　C---->五

　　D---->七

　　2、設A的值為：ABCDEF

　　程序代碼：

　　SET TALK OFF

　　CLEAR

　　ACCEPT "A=" TO A

　　L=LEN(A)

　　P=SPACE(0)

　　I=1

　　DO WHILE I

　　P=P+SUBSTR(A,L-I,2)

　　I=I+2

　　ENDDO

　　?A+"------>"+P

　　SET TALK ON

　　參考答案：

　　ABCDEF------>EFCDAB