求一个五位数是否为回文数
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/09/29 16:16:58
求一个五位数是否为回文数
Private Sub Form_Click()
a = InputBox("1")
Print a
sl = Len(a)
For i = 1 To 2
If Left(a, i) Right(a, i) Then
Print "no"
Exit For
Else
Print "yes"
End If
Next
End Sub
请问错在哪里? 谢谢!
niuxiaojia45 你的答案我复制上去 可是运行的时候无论输入什么都打印出"yes"!
Private Sub Form_Click()
a = InputBox("1")
Print a
sl = Len(a)
For i = 1 To 2
If Left(a, i) Right(a, i) Then
Print "no"
Exit For
Else
Print "yes"
End If
Next
End Sub
请问错在哪里? 谢谢!
niuxiaojia45 你的答案我复制上去 可是运行的时候无论输入什么都打印出"yes"!
你的if只比较了第一位和最后一位就会输出一次答案,如果输入12341就会输出
yes
no
输入12321也是输出
yes
no
你的程序第一位可以判断正确,但当i 的值为2时就会出错.当输入a=12321
left(a,2)=12而right(a,2)=21 很明显他们不相等.
你可以这样写
Private Sub Form_Click()
a = InputBox("1")
do while len(a)5 '输入不是5位数就重新输入
msgbox "请输入一个5位数!"
a=inputbox("1")
loop
For i = 1 To 2
If Mid(a,i,1) Mid(a,6 - i,1) Then
Exit For
Else
Print "yes"
Exit Sub
End If
Next i
Print "no"
End Su
yes
no
输入12321也是输出
yes
no
你的程序第一位可以判断正确,但当i 的值为2时就会出错.当输入a=12321
left(a,2)=12而right(a,2)=21 很明显他们不相等.
你可以这样写
Private Sub Form_Click()
a = InputBox("1")
do while len(a)5 '输入不是5位数就重新输入
msgbox "请输入一个5位数!"
a=inputbox("1")
loop
For i = 1 To 2
If Mid(a,i,1) Mid(a,6 - i,1) Then
Exit For
Else
Print "yes"
Exit Sub
End If
Next i
Print "no"
End Su
求一个五位数是否为回文数
如何判断输入的一个五位数是否是回文数如“12321”
2) 判断一个数是否为回文数
一个四位数的回文数乘以45后成为一个五位数的回文数,这个五位数是几?
求n~m之间所有“回文数”之和.要求编制函数 JSValue(x)用于判断x是否为回文数.回文数是指各位数字左右对
c语言求回文数定义一个函数,判断数x是否为回文数,如果是则返回1,否则返回0,在主函数中调用该函数,求1~10000的回
编写程序,从键盘输入一个5位数,判断该数是否为回文数.
编写函数void fun(long n),求任意一个小于65535的正整数n的逆序数,并判断该数是否为回文数,是输出“Y
五位数的回文数有多少个
C++:编写一个程序,判断一个整数是否为回文数
判断一个数是否为回文数(回文数就是像12321,正着读和倒着读都一样) 要求:(1)定义一个函数separate(int
定义一个函数,判断数x是否为回文数,如果是则返回1,否则返回0.在主函数中调用该函数,求