下载文档原格式
C语言程序设计（第2版）课后习题答案第一章1.请参照本章例题，编写一个C程序，输出以下信息：**************************Very good!**************************解：#include<stdio.h>void main(){printf("**************************");printf("\n");printf("Very good!\n");printf("\n");printf("**************************");}2.编写一个C程序，输入a、b、c三个值，输出其中最大值。
解：#include<stdio.h>void main(){int a,b,c,max;printf("请输入三个数a,b,c:\n");scanf("%d,%d,%d",&a,&b,&c);max=a;if(max<b) max=b;if(max<c) max=c;printf("最大数为: %d",max);}第二章1.假如我国国民生产总值的年增长率为10%，计算10年后我国国民生产总值与现在相比增长多少百分比。
计算公式为P=(1+r)^n，r为年增长率；n为年数；P为与现在相比的百分比。
解：#include<stdio.h>#include<math.h>void main(){double P, r=0.1, n=10;P=pow((1+r), n);printf("%lf\n", P);}3.请编程序将"China"译成密码，译码规律是用原来字母后面的第4个字母代替原来的字母。
VB期末考试考卷及答案一、选择题（每题1分，共5分）1. 在VB中，下列哪个函数用于返回字符串的长度？A. Len()B. Length()C. Size()D. Count()A. DimB. IntegerC. IntD. Var3. 在VB中，下列哪个语句用于退出当前循环？A. Exit ForB. BreakC. Exit DoD. ContinueA. OpenB. LoadC. CreateD. Read5. 在VB中，下列哪个事件在窗体加载时发生？A. LoadB. InitializeC. FormLoadD. FormOpen二、判断题（每题1分，共5分）1. VB中的变量必须先声明后使用。
（）2. 在VB中，Sub过程可以返回值。
（）3. VB中的数组下标从1开始。
（）4. 在VB中，可以使用Select Case语句进行多条件判断。
（）5. VB中的字符串可以用单引号(')表示。
（）三、填空题（每题1分，共5分）1. 在VB中，用于声明常量的关键字是______。
2. VB中的逻辑运算符包括______、______和______。
3. 在VB中，要实现两个变量的值交换，可以使用______变量作为中间变量。
4. 在VB中，______方法用于设置文本框的字体。
5. VB中的______事件在用户单击按钮时发生。
四、简答题（每题2分，共10分）1. 简述VB中事件的执行过程。
2. 请列举三种VB中的数据类型。
3. 简述如何使用Select Case语句进行多条件判断。
4. 请说明如何使用VB中的循环结构实现1到100的累加。
5. 简述如何使用VB中的文件操作函数读取文件内容。
五、应用题（每题2分，共10分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。
2. 编写一个VB程序，实现用户输入一个字符串，程序将其逆序输出。
3. 编写一个VB程序，使用循环结构输出九九乘法表。
1. 参照下图制作一滚动字幕（滚动方式自由设计）。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
2. 建立一个如下图所示的记事本应用程序（小图标也可用文字替代）。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
3. 编写华氏温度与摄氏温度之间转换的程序。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
4. 建立一个登录程序，界面参考下图。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
5. 编写一个自动贩卖机系统，运行界面如下图所示。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
6. 编写如下图所示的猜数游戏程序。
7. 百元买百鸡。
假设小鸡每只0.5元，公鸡每只2元，母鸡每只3元，编程求解购鸡方案。
结果如下图所示。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
8. 编写一个简易“学生成绩管理系统”。
第一行3个按钮的功能必做，第二行完成“成绩统计”功能。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
9. 编写一个简易“学生成绩管理系统”。
第一行3个按钮的功能必做，第二行完成“成绩排序”功能。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
10. 编写一个简易“学生成绩管理系统”。
第一行3个按钮的功能必做，第二行完成“成绩查询”功能。
任务1：完成学生成绩管理系统。
第五章要求：1）利用数组实现各个按钮的功能。
2）动态数组。
11. 完成如下图所示的“课程管理系统”程序设计。
12. 随机生成3个正整数，其中1个一位数，1个二位数，1个三位数，计算它们的平均值，保留两位小数，运行界面如下图所示。
VB程序设计题1* 编写程序：设计一个程序，随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。
Dim num As Integer, a As String, b As Stringdim c As String, result As IntegerRandomizenum = Int(Rnd * 900) + 100a = Left(LTrim(Str(num)), 1)b = Mid(LTrim(Str(num)), 2, 1)c = Right(LTrim(Str(num)), 1)result = Val(c) * 100 + Val(b) * 10 + Val(a)Print num, result3* 编写程序：在文本框中输入弧度值，将弧度换算为角度值（度、分、秒）的形式并输出，要求秒数保留三位小数。
Dim a As Double, b As Integer, c As Integer, d As SingleConst PI = 3.14a = 180 * Val(Text1.Text) / PIb = Int(a)c = Int((a - Int(a)) * 60)d = ((a - b) * 60 - c) * 60Print b & "度" & c & "分" & Format(d, "####.000") & "秒"6* 编写一个计时程序。
* 界面要求： * 使用标签、命令按钮、时钟控件完成。
* 运行要求： * 1、点击“开始”按钮，标签显示 0并开始计时，每隔一秒，标签中显示的秒数加1；* 2、点击“结束”按钮，停止计时。
Dim t As IntegerPrivate Sub Command1_Click()Timer1.Enabled = Truet = 0Timer1.Interval = 1000End SubPrivate Sub Command2_Click()Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()t = t + 1Label1.Caption = tEnd Sub12* 编写程序：编程计算1+(1+2)+(1+2+3)+…+（1+2+3…+n），n由用户输入。
vb上机题库及答案【篇一：vb期末考试上机题编程答案】xt>1.新建一个工程，编写一个找出所有四位幸运数显示在列表框中，并将幸运数的个数显示在文本框中。
所谓幸运数是指凡前两位数字之和等于后两位数字之和的四位数。
将原窗体文件和工程文件分别另存为为f.frm和p.vbp，保存在d盘的vbtest文件夹中。
如不按要求保存，造成文件无法上传，后果自负！具体要求：1、程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见；2、单击查找按钮，则开始查找并在列表框中显示结果，并在文本框中显示幸运数的个数；3、单击“清除”按钮，则将列表框和文本框清空；4、单击“退出”按钮，结束程序运行；5、程序中应包含一个过程，用于判断一个数是否是幸运数。
解：private sub command1_click()dim i as integer, a as integerfor i = 1000 to 9999if k(i) then list1.additem i: a = a + 1next itext1.text = aend subprivate sub command2_click()list1.cleartext1.text =end subprivate sub command3_click()endend subprivate function k(n as integer) as integerdim i as integer, a as integer, s1 as integer, s2 as integer dims as strings = cstr(n)for i = 1 to len(s) / 2s1 = s1 + mid(s, i, 1)s2 = s2 + mid(s, len(s) + 1 - i, 1)next iif s1 = s2 then k = trueend function2. 新建一个工程，编写求某一自然数因子和的程序。
浙江省五年（2015-2019）高中学考、高考选考信息技术真题分类汇编专题16 VB（学考）非选择题（解析版）1.（2019年6月）小宇为选定班级参赛作品编写了一个VB程序，设计如下：在文本框Text1内输入5位评委对3个作品的评分数据（评委对作品的评分数据由3位十进制数组成，第1位对应作品编号，第2、3位对应作品得分，分值范围为[60,99]。
如“275”表示2号作品得分75）。
单击“计分”按钮后，在标签Label1中输出3个作品的平均分，在标签Label2中输出参赛的作品（选择最高平均分作品参赛，若最高平均分存在并列，则从并列作品中随机柚取）。
程序运行界面如图所示。
（1）“计分”按钮的对象名为。
（2）程序部分代码如下，请在划线处填入合适代码。
Private Suh jf_Click( )Dim s As String，d As String，i As IntegerDim f1As Single，f2As Single，f3As Singles = Text1. Texti = 1Do Whiled = Mid(s,i,3)If Mid(d,1,1) = "1”Thenf1 = f1 + Val(Mid(d,2, 2))ElseIf Mid(d, 1, 1) = “2”Thenf2 = f2 + Val(Mid(d,2, 2))Elsef3 = f3 + Val(Mid(d,2, 2))End IfLoopLabel1.Caption="作品1平均分为:" + Str(f1 / 5)+ “作品2平均分为:” + Str(f2 / 5)+ “作品3平均分为:” + Str(f3 / 5)'以下省略“处理并列最高平均分，并在Labd2中输出选取的参赛作品”的代码End Sub（3）运行该程序时，在文本框Text1中以不同的顺序输入原评分数据：380/295/283/170/180/385/372/285/190/180/390/384/272/170/276,单击“计分”按钮，则Label1中显示的结果(选填:会/不会）发生改变。
一、单选题1. 一个完整的计算机系统应包括（ B ）。
(A)主机、键盘、显示器(B) 硬件系统和软件系统(C) 主机和其他外部设备 (D) 系统软件和应用软件2．我们通常说的“U盘”属于计算机部件中的（ C ）。
(A) 输出设备 (B) 输入设备(C) 存储设备 (D) 打印设备3.在下列存储器中，存储速度最快的是( D )。
(A)软盘 (B)硬盘 (C)光盘(D)内存4. 计算机中采用二进制，是因为（ D ）。
(A)可降低硬件成本(B)两个状态的系统具有稳定性(C)二进制的运算法则简单(D)上述三个原因5. 是Internet中的( B )。
(A) 硬件编号(B) 域名 (C) 密码 (D) 软件编号6. 下列设备中，（D ）不能作为计算机的输出设备（A）打印机（B）显示器（C）绘图仪（D）键盘[标准的输入设备]7. 计算机的主机由（B ）部件组成[主机箱内硬件的总称]（A）CPU、外存储器、外部设备（B）主机板，CPU和内存储器（C）CPU和存储器系统（D）主机箱、键盘、显示器8. 在Word中将文档中一部分文本内容复制到别处，首先要进行的操作是（ C ）（A）粘贴（B）复制（C）选择（D）剪切9. Windows系统中，回收站的功能是（B ）（A）浏览上网的计算机（B）存放删除文件（C）设置计算机参数（D）收发信件10. 关于电子邮件的叙述正确的是（C ）（A）电子邮件只能传输文本（B）电子邮件只能传输文本和图片（C）电子邮件可以传输文本、图片、视像、程序等（D）电子邮件不能传输图片11. 下列关于电子邮件的说法，正确的是（C ）（A）收件人必须有E_mail账号，发件人可以没有E_mail账号（B）发件人必须有E_mail账号，收件人可以没有E_mail账号（C）发件人和收件人均必须有E_mail账号（D）发件人必须知道收件人的邮政编码12.下列有关Word的叙述，正确的是（B ）（A）Word是一个应用软件，它只能对文字进行编辑处理（B）Word是在Windows环境下运行的应用软件（C）文档的缺省扩展名是.wrd（D）在Word中，一次只能打开一个文档13. 计算机当前的应用领域广泛，但据统计其应用最广泛的领域是（A ）（A）数据处理（B）科学计算（C）辅助设计（D）过程控制14. 在计算机的内部所处理的任何信息均是采用（B ）。
第一章环境和程序设计初步一.选择题1.在Visual 的集成开发的环境中，下面不属于该环境编程语言的是（c）。
A.VBB.C++C. PascalD. J#2.在集成开发环境中有两类窗口，浮动窗口和固定窗口，下面不属于浮动窗口的是（d）。
A.工具箱窗口B.属性窗口C.立即窗口D.窗体窗口3.在中，在窗体上显示控件的文本，用（a ）属性设置。
A. TextB. NameC. CaptionD. Image4.不论何种控件，共同具有的是什么属性( b )。
A. TextB. Name C．ForeColor D．Text5．对于窗体，可改变窗体的边框性质的属性是（b）。
A.MaxButtonB. FormBorderStyleC. NameD. Left6.若要使标签控件显示时不要覆盖窗体的背景图案，要对（a）属性进行设置。
A．BackColor B. BorderStyle C．ForeColor D.BackStyle7．若要使命令按钮不可操作，要对（a）属性进行设置。
A. EnabledB.VisibleC. BackColorD. Text8.要使文本框中的文字不能被修改，应对（d）属性进行设置。
A. LockedB. VisibleC. EnabledD. ReadOnly9.要使当前Form1 窗体的标题栏显示“欢迎使用”，以下（b）语句是正确的。
A.Form1.Text=“欢迎使用V”B.Me. Text=“欢迎使用”=“欢迎使用”D.Me. Name=“欢迎使用”10.当运行程序时，系统自动执行启动窗体的（a）事件过程。
A. LoadB. ClickC. UnLoadD. GotFocus11.当文本框的ScrollBars属性设置了非None值，却没有效果，原因是（b）。
A.文本框没有内容B.文本框的MulitLine属性为FalseC.文本框的MulitLine属性为TrueD.文本框的Locked属性True12．要判断在文本框中是否按了Enter键，应在文本框的（d）事件中判断。
VB编程题及答案1定义一个下标上界为10整型数组，并用随机函数为其赋值（值处于[0,100]之间），计算数组中所有偶数的和。
Private Sub Command1_Click() RandomizeDim a%(10)Dim i%, s%For i = 0 To 10a(i) = 101 * Rnd()NextFor i = 0 To 10If a(i) Mod 2 = 0 Thens = s + a(i)End IfNextPrint "所有偶数的和为", s2设S=35，C=0.3，编写程序，计算并输出下面级数的部分和。
结果取小数点后面7位。
C/1!-C^3/3!+C^5/5!- …+(-1)^(S-1)*C^(2*S-1)/(2*S-1)!+ …参考答案如下：Private Sub Command1_Click()Dim n As IntegerDim x As Doublex = 0.3Dim item As DoubleDim sum As DoubleDim fac As DoubleFor n = 1 To 35fac = 1Dim i As IntegerFor i = 1 To 2 * n - 1fac = fac * iNextitem = (-1) ^ (n - 1) * x ^ (2 * n - 1) / facsum = sum + itemNextsum = Int(sum * 10000000 + 0.5) / 10000000MsgBox (sum)End Sub ' sum = 0.4794263定义一个下标上界为30的单精度数组，设置好其初值（值处于[20，90]），计算数组中所有元素的均值。
Dim i, sum, ave As IntegerDim a(30) As SingleFor i = 0 To 30a(i) = 20+Int(Rnd() * 71)NextFor i = 0 To 30sum = sum + a(i)Nextave = sum / 31print sum4 在窗体上放置文本框Text1、Text2，放置一个按钮Command1。
VB练习题(上机)含答案VB练习题(上机)含答案第一部分1 在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值")。
程序运行后，单击命令按钮完成以下工作：①随机产生20个0到1000的整数，将其放入一个一维数组中②求出所有元素的平均值，并显示在窗体上(如下图所示)Private Sub Cmd1_Click()Dim a%(19), i%, sum!, aver!RandomizeFor i = 0 To 19a(i) = Int(Rnd * 1001)sum = sum + a(i)Next iaver = sum / 20Print averEnd Sub2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮，如下图所示。
在程序运行时，单击"转换"按钮，可以把Text1中的小写字母转换为大写，把大写字母转换为小写，其他字符不变。
Private Sub C1_Click()Dim ch As String, ch1 As String, i%ch = Text1For i = 1 To Len(ch)If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Thench1 = ch1 + LCase(Mid(ch, i, 1)) Elsech1 = ch1 + UCase(Mid(ch, i, 1)) End IfNext iText1 = Text1 + vbCrLfText1 = Text1 + ch1End Sub3 在窗体上添加一个命令按钮(名称为MyCmd1，标题为"输出最大值")。
程序运行后，单击命令按钮完成以下工作：①随机产生30个0～1000的整数，将其放入一个一维数组中②求出其中的最大值，并显示在窗体上。
