把20（包括20）以内的正整数，按要求填在下面的（）中

奇数（　　　　　　　　）
偶数（　　　　　　　　）
3的倍数（　　　　　　　　）
质数（　　　　　　　　）
含有2的约数（　　　　　　　　　）

奇数（　1、3、5、7、9、11、13、15、17、19　　）
偶数（2、4、6、8、10、12、14、16、18、20　）
3的倍数（3、6、9、12、15、18）
质数（2、3、5、7、11、13、17、19）
含有约数2的（　2、4、6、8、10、12、14、16、18、20）

祝你开心

简单明了，单击窗体输出 private sub form_click() cls dim a(19) as integer for i = 0 to 19 a(i) = int(rnd * 100) if a(i) mod 2 <> 0 then s1 = s1 & a(i) & "," else s2 = s2 & a(i) & "," end if next print "奇数：" & s1 print "偶数：" & s2 end sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息