回文数问题改错。。知道的大师请进!!!
题目:输入一个正整数,判别是否回文数。(回文数:从左至右与从右至左读起来都是一样的数字,如:121是一个回文数。)
要求:用for循环实现,循环变量用i,如果是回文数,结果为.T.;不是,结果为.F.。将判断结果存放在变量S中,且红字部分不能改。
我的答案(有误):
set talk off
input "数字:" to m
n=str(m)
L=len(n)
for i=1 to L
if subs(n,i,1)=subs(n,L-i+1,1)
s=".T."
else
s=".F."
endif
endfor
?s
set talk on
答案做出来都是.F.!
各位大师!!拜托帮我看看哪里不对需要改下!!!小女子这厢谢过先!!!!
[[it] 本帖最后由 zzyymxt 于 2008-6-11 23:53 编辑 [/it]]