(资料图片仅供参考)
一、题文
某校跳高比赛计分规则如下：每个高度每位选手最多试跳三次，成功记为1，失败或轮空记为0。如选手第一次试跳成功记为100，第二次试跳成功记为010，第三试跳成功记为001，三次失败则终止比赛。编写VB程序统计选手积分，在文本框Text1中输入姓名和成绩，在列表框List1中输出结果，其算法如下：1.将每个选手的跳高记录三位一组转换成十进制数存储到数组a(该数组元素的值都不相同)。2.先比较数组a中各数组元素的长度，长度长的排名在前；若长度相同的情况下从后往前依次比较字符大小，当前数值大的排名在前。程序运行界面如图所示：请在划线处填入合适的代码。存储跳高成绩存储学生姓名DimchAsString，tmpAsInteger，tAsIntegerDimpAsInteger，kAsInteger，iAsInteger，jAsIntegerDimsAsStrings=Text1.Text:t=0①______“/“ThenElset=t+1IftMod2=0ThenElse②______EndIfch=““EndIfNextiNextip=ip=jp=jflag=falsek=k-1Elseflag=FalseEndIfLoopEndIfNextjEndIfNexti③______NextiEndSubDimtempAsStringDimiAsInteger，jAsIntegerFori=1To④______Forj=1To3Nextj函数可把表达式转换为字符串类型temp=0NextiEndFunction
二、解答
程序算法是先对输入的姓名和成绩逐个判断分离，故①处应填入：或。每个人成绩中有2个“/”，故碰到奇数个“/”，则分离出来的是成绩，要存入数组b中，故②处应填：或。最后要把排好的名次、姓名、成绩在List1中输出，故③处应填：““““。三位一组，故④应填：。故答案为：①或②或③““““④本文到此结束，希望对大家有所帮助。
