保证正确运行的QBASIC程序如下:
INPUT "n=",n
i = 1
WHILE n > 0
a(i) = n MOD 10
n = n 10
i = i + 1
WEND
ok = 1
j = 1
i = i - 1
WHILE i > j
IF a(i) a(j) THEN ok = 0
i = i - 1
j = j + 1
WEND
IF ok = 1 THEN PRINT "ok" ELSE PRINT "no"
运行的界面如下:
n=2
ok
n=11
ok
n=121
ok
n=94294
no
请注意,你举例的94294不是回文!
从程序写算法是很简单的,我相信你能做,因为你们老师布置的作业已经不是入门程序了.