二级VFP中:先将在字符串s中的字符按正序存放到t串中,然后把s中的字符按逆序连接到t串的后面。

请在【】处添上适当的内容,使程序完整。
----------------------------------------------------------------------------------------------------------------------
SET TALK OFF
CLEAR
***************************SPACE*****************************
【?】”请输入一个串:” TO SS
T=””
FOR I=1 TO LEN(SS)
T=T+SUBS(SS,I,1)
ENDF
*************************SPACE*******************************
FOR J=【?】TO 1 STEP -1
*************************SPACE*******************************
T=T+【?】
ENDF
?”生成的新串为:”,T
SET TALK ON
CANC

第1个回答  2013-05-04
第一个空不能用input,因为它只接收数字。

SET TALK OFF
CLEAR
***************************SPACE*****************************
acce "请输入一个串:" to ss
T=""
FOR I=1 TO LEN(SS)
T=T+SUBS(SS,I,1)
ENDF
*************************SPACE*******************************
FOR J=len(ss) TO 1 STEP -1
*************************SPACE*******************************
T=T+SUBS(SS,j,1)
ENDF
?"生成的新串为:",T
SET TALK ON
CANC

这道题是想用键盘输入的字符串生成一个 由输入的串加这个串的倒序组成的新字符串,在实际编程中不用这么麻烦,这样做就好了:
SET TALK OFF
CLEAR
acce "请输入一个串:" to ss
T=""
FOR J=len(ss) TO 1 STEP -1
T=T+SUBS(SS,j,1)
ENDF
T=ss+T
?"生成的新串为:",T
SET TALK ON
CANC本回答被提问者采纳
第2个回答  2013-05-04
SET TALK OFF
CLEAR
***************************SPACE*****************************
input ”请输入一个串:” TO SS
T=””
FOR I=1 TO LEN(SS)
T=T+SUBS(SS,I,1)
ENDF
*************************SPACE*******************************
FOR J=len(ss) TO 1 STEP -1
*************************SPACE*******************************
T=T+SUBS(SS,j,1)

ENDF
?”生成的新串为:”,T
SET TALK ON
CANC
相似回答