编写一个程序，输入一个整数，判断它是偶数还是奇数

Question

如题所述

Answer 1

PrivateSubCommand1_Click()DimnAsLongn=Val(Text1.Text)IfnMod2=0ThenLabel2.Caption="是偶数"ElseLabel2.Caption="是奇数"EndIfEndSub希望采纳

Answer 2

c..都忘的差不多了给你写步骤吧..1.声明个变量n2.获得输入附值到变量中3.判断变量能否被2整除(n%2是否为1,如果等于1则是奇数,如果是0则是偶数)%是取余数的意思4.输出本回答被网友采纳

Answer 3

if（a%2==0）输出偶数
输出奇数