VB输入十个成绩,统计及格和不及格人数并计算平均分

在窗口上放两个控件,一个text1,一个command1,并注意窗口不要太小、控件不要太靠窗口的顶部.程序如下：PrivateSubcommand1_click()DimLAsInteger,SAsS

设内存中有一个字节数组SCORE,存有10个学生的考试成绩,编写多分支程序,统计大于（含等于,以下同）90分,大于80分,大于70分,大于60分,小于60分的人数,结果分别置于A、B、C、D、E字节单

dimarray(),iasinteger,jasintegerdimmin_iasinteger,max_jasinteger'用来标注数组中最小值和最大值的下标redimarray(10)=[1,

dimA(1to26)asintegerdimiasinteger,jasinteger,casstring*1,tasintegert=len(text1)fori=1totc=ucase(mid(

PrivateSubCommand1_Click()Doa=Val(InputBox("输入整数,-1结束:"))IfaMod2=0Thens=s+1LoopUntila=-1Print"共有";s;

#includeinta[10],i,j=0,k=0;for(i=0;i

        Dim a As Double = 0 &#

DimaAsString,bAsString,nasintegerb="the"a=text1.textn=0Fori=1ToLen(a)IfInStr(i,a,b)>0Theni=InStr(i,a

优良率：（15+20）/（15+20+12+3）*100%=70%及格率：（15+20+12）/(15+20+12+3)*100%=94%

#includeintmain(){floata[10];inti;printf("请输入使命学生的成绩：");for(i=0;i

这个用一维数组保存学生姓名用二维数组保存学生的两门课程成绩统计每门课程的总成绩,平均分,最高分和最低分这个很好做,要代码可以加我好友.

设全班有100人,则总得分为100*70=7000分及格人数为75人,他们总得分为75*80=6000分所以不及格的人总得分为7000-6000=1000分他们的平均成绩为1000/25=40分

（1）1-10×（0.015+0.010+0.005）=1-0.3=0.7=70%答：及格率为70%（2）10×（0.010+0.010）=20%1000×20%=200人答：该校优秀学生有200人答

#includevoidmain(){intscore=0,i=0,j=0;//score记录分数,i记录及格人数,j记录不及格人数printf("输入成绩（0-100）,输入-1时退出：\n");w

#includevoidmain(){inti,n,count=0;for(i=0;i=0)count++;}printf("正数的个数为:%d\n",count);printf("负数

#includeintmain(){inti,n=0;floats[10];for(i=0;iscanf("%f",&s[i]);if(s[i]n++;}printf("及格人数：%d,及格率：%d\

DimnumAsIntegerDimzhengshuAsSingleDimiAsIntegerDimfushuAsSingleDimjAsIntegerPrivateSubCommand1_Click

#includevoidmain(){inti,arr[10];intsum=0;intcount=0;doubleavg=0;for(i=0;i!=10;++i){scanf("%d

优秀和及格的人数占参赛学生总数的1/5+3/4=4/20+15/20=19/20不及格1-19/20=1/20请好评~在我回答的右上角点击【评价】,然后就可以选择【满意,问题已经完美解决】了.如果你认

呵呵,二楼的写法是基本正确应该是=IF（A1