输入一个正整数,编程判断该数是奇数还是偶数

Private Sub Form_Click()
Dim a As Integer
Dim b As Integer
a = InputBox("请输入一个数字")
If Int(b / 2) = b / 2 Then Print "这个数是偶数"
If Int(b / 2) < b / 2 Or Int(b / 2) > b / 2 Then Print "这个数是奇数"
End Sub 怎么输入什么数字都是偶数啊~

第1个回答  2014-01-09
大哥,除2取余就可以了,判断余数是否为1,是的话为奇数
第2个回答  2022-07-10
print("判断一个数是否为偶数")
number=input("请输入一个整数:")
time=1
while(time==1):
while(not (number.isdigit())):
print('这不是一个整数,请重新输入:',end=' ')
number=input()
number=int(number)
a=number/2
b=int(a)
if(a-b>0):
print(str(number)+"不是偶数。")
else:
print(str(number)+'是偶数。')
print("重新判断请输入‘1’:",end=" ")
time=input()
if(time.isdigit()):
time=int(time)
if(time==1):
number=input('请输入一个整数:')
print('判断结束!')
第3个回答  2014-01-09
Function check(ByVal n As Integer) As Boolean
If ((n Mod 2) = 0) Then
check = True Exit
End If check = False
End Function本回答被网友采纳
第4个回答  2014-01-09
把2改为2.0
相似回答