VB编程-C类.docVIP

PAGE  PAGE 4 Visaul Basic程序设计（编程题）—2011年 C类题 说明：C类题以简单的循环结构程序设计为主（可含IF语句）包括FOR循环语句的基本应用、Do循环语句的基本应用、字符串函数（Len、Right、Left、Mid ）的应用和基本算法（累加、累乘、计数器） C01：生成20个[0,9] 范围内的随机整数，显示其中大于5的（求和）。 C02：输出1000以内所有的奇数和，偶数和 C03：1、（右图） 2、求数列1╳3，2╳4，3╳5，……，9╳11……前n项和 3、计算1/1+1/2+1/3+……+1/10的值 4、计算12+22+32+……+202的值 C04：编程求累加101+102+103+……+X的值(101≤X≤200)。X的值由键盘输入， 累加结果显示在“结果”框中。 C05：编程实现：单击“计算”按钮，求100个两位数的随机整数之和，并显示出来。单击“清除”按钮，清除相应数据。要求必须使用循环语句实现。 C06：模拟生成25名女生的身??[155,175]，显示并求平均值 C07：求N!=1*2*3*…*N，N值由键盘输入（N应在110之间，否则输出“N值不符合要求”）。 C08：在[1~1000]区间中的所有整数中，分别计算能被3整除的数的个数及 能被7整除的数的个数，结果显示如题所示。 要求：必须使用循环语句实现。 c09： 连续掷骰子，显示每次投掷的结果，直至出现6点为止，显示已投掷的次数。 C10：张华计划种树：第一年种5棵，以后每年递增2棵，编程帮他计算一下，完成100棵，需要几年？ c11：据国家统计局调查报告：2010年末我国人口为13.7053亿，增长率为0.57%，若按此速度增长，多少年后，我国人口达到或超过15亿？ C12：编程计算 S=1+2+3+4+……N,找一个最大整数,使得S30000 C13：输入1个英文单词，统计“s”出现的次数？ c14：输入10个英文单词，统计“t”开头的有几个？ C15：输入一个字符串，倒序输出 C16：输出所有的水仙花数。即水仙花数是三位数，并且满足每位数字立方之和等于这个数。 如：153=1^3+5^3+3^3 1、Cls Randomize For i = 1 To 20 x = Fix(Rnd * 10) If x 5 Then Print x Next i 2、s1 = 0 s2 = 0 For i = 1 To 1000 If i Mod 2 = 0 Then s1 = s1 + i Else s2 = s2 + i End If Next i Label2.Caption = s1 Label4.Caption = s2 3、S = 0 n = Val(Text1.Text) For X = 0 To n - 1 Step 1 S = S + 1 / 2 ^ X Next X Label3.Caption = S 4、 s = 0 n = 1 Do s = s + n n = n + 1 Loop Until s + n 30000 Label3.Caption = n - 1 Label4.Caption = s 5、For i = 1 To 100 a = Fix(Rnd * 90) + 10 s = s + a Next i Label2.Caption = s Randomize 6、For i = 1 To 25 a = Fix(Rnd * 21) + 155 s = s + a Next i Label2.Caption = s / 25 Randomize 7、a = Val(InputBox(n=, 输入N值 (510￡?)) If a 5 Or a 10 Or a Fix(a) Then MsgBox (N值不符合要求，请重新输入。) Else s = 1 For i = 1 To a s = s * i Next i Label1.Caption = s End If 8、For x = 1 To 1000 Step 1 If x Mod 3 = 0 Then n = n + 1 If x Mod 7 =