求教如何用QB判断回文数,考试题,请各位大师帮帮忙啊

主题：求教如何用QB判断回文数,考试题,请各位大师帮帮忙啊

TZXINZHE [专家分：0] 发布于 2006-10-18 22:14:00

求教如何用QB判断回文数,考试题,请各位大师帮帮忙啊,回文数如12321,456654.

本帖地址： http://bbs.pfan.cn/post/198180.html

回复列表（共3个回复）

沙发

TZXINZHE [专家分：0] 发布于 2006-10-19 21:29:00

怎么没人指教啊,是不是问题很菜啊,是小学五年级儿子的问题,急盼指教!!!!!![em10]

板凳

ji8888ji [专家分：20] 发布于 2006-10-30 08:46:00

解决这类问题可以用简单变量、数组、字符串来解答。既然是小学生那就用最基本的方法。
input n
k=n
do
   r=n mod 10

   s=s*10+r
   n=n\10
loop until n=0
if n=k then print "yes" else print "no"
end

3 楼

dashu035 [专家分：0] 发布于 2006-11-23 11:33:00

求100到999的回文数
cls
for i=100 to 999
x=i mod 10
y=fix(i/100)
if x=y then
?i
next
[em1]

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：求教如何用QB判断回文数,考试题,请各位大师帮帮忙啊

回复列表（共3个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：求教如何用QB判断回文数,考试题,请各位大师帮帮忙啊

回复列表 （共3个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共3个回复）