从1到100之间随机取出一个整数,判断其是奇数还是偶数,并输出结果。画出结构流程图。

谁会做帮一下忙啊!

第1个回答  2009-06-02
vb:
Private Sub Command1_Click()
Randomize
r = Int(Rnd() * 100) + 1
If r Mod 2 = 0 Then
Print "r=" & r & "为偶数"
Else
Print "r=" & r & "为奇数"
End If
End Sub本回答被网友采纳
第2个回答  2009-06-02
那么

参考资料:大风过后

相似回答