题目

【加试题】某VB程序段如下： s = For i = 1 To 5 a(i) = 0 Next i For i = 2 To 5 For j = i To 5 If j Mod i = 0 Then a(j) = 1 - a(j) Next j Next i For i = 1 To 5 If a(i) = 1 Then s = s + Str(i) Next i Text1.Text = s 运行该程序段后，Text1中显示的内容为（ ） A . 2 3 5 B . 1 4 C . 2 5 D . 2 3 4 答案：A学校组织登山比赛，报名人数如下表． 年级人数/人性别 一年级 二年级 三年级 四年级 五年级 六年级 男生 65 70 75 82 90 100 女生 58 66 75 80 92 100（1）请根据统计表中的数据完成统计图．（2）你发现了什么信息？（3）这幅统计图还可以怎么画？动手试一试吧．