VB 先有一个框让我输入10个整数,分别计算出 奇数个数和,偶数个数和.

来源:学生作业帮助网 编辑:作业帮 时间:2024/09/28 14:35:22
VB 先有一个框让我输入10个整数,分别计算出 奇数个数和,偶数个数和.
xN@_ez$|mmCio5ODC$pPD D1v%p|3owC<>UQOz{t@3˴W< *='Hs >z@o*{3?vu! ;,2e&KnGs'Σu\\46K)V5ܒuҏf93`PŃ;F|NmLр-yJ9I&mRSsJT2:0ˬvL

VB 先有一个框让我输入10个整数,分别计算出 奇数个数和,偶数个数和.
VB 先有一个框让我输入10个整数,分别计算出 奇数个数和,偶数个数和.

VB 先有一个框让我输入10个整数,分别计算出 奇数个数和,偶数个数和.
给个最简单的示例你
x=0:y=0
for i=1 to 10
a=inputbox("请输入一个任意整数!","提示")
if a="" then
msgbox "你至少输入一个数!","提示":i=i-1
else
if (a mod 2)=0 then
x=x+1
else
y=y+1
end if
end if
next
msgbox "偶为:" & x & vbcrlf & "奇数为:" & y