算法与程序设计总复习测试题.pdf

1 算法与程序设计总复习测试题算法与程序设计总复习测试题 一 一 分析并填写程序运行结果分析并填写程序运行结果 1 Dim a b c AS Integer a 15 b 60 c 38 if ac then m c end if Print M m End Sub 运行结果 2 Dim X AS Integer Y AS Interger Text1 Text X 99 Y 98 M X If X Y then M Y end if Text1 caption M End Sub 运行结果 3 分析程序 写出计算结果 Dim i S as integer S 1 For i 1 to 4 S S i Next i Print S S End Sub 运行结果 4 分析程序 写出计算结果 Dim I S as integer S 0 For I 2 to 6 S S I Next I Print S S End Sub 运行结果 5 p 1 For i 1 to 5 p p i next i print I P 分别为 i p 输出 I P 分别为 6 Sum 0 For i 1 To 100 sum sum 2 Next i print Sum sum 输出 7 a 1 b 0 Do while a 5 b b a a a a 1 Loop Print a b 屏幕上显示的内容是 8 题目中是一个求二次函数曲线顶点坐标的 VB 程序 在运行是 Text1 Text2 Text3 分别输入 3 6 9 三个数 请问 Text4 Text5 输出结果分别就 应为多少 每空 4 分 共 8 分 9 写程序结果 Text2 34 a Val Text2 32 5 2 Print a 答案 2 二 分析程序并补充完整二 分析程序并补充完整 1 用程序实现函数 y x Dim X AS Integer Y AS Interger Text1 Text X InputBox X if then Y X Else End If Text1 Text Y End Sub 2 计算 1 2 3 100 的值 Dim i s AS Integer s 0 For i 1 TO s Next i Print S s End Sub 3 计算 1 3 5 99 的值 Dim i s AS Integer s 0 for i 1 to Step 2 s Next i Print S s End Sub 4 计算 1 1 2 1 50 的值 Dim i s as integer s 0 3 For i 1 to s Next i Print S s End Sub 5 完善程序 打印如下图形 For i 1 To 6 For j 1 To Print Next j 6 执行下列程序段后 变量 x 的值为 x 3 y 77 DO WHILE x 10 Then Exit for Next I Print p 答案 8 Ch DEF For i 1 to 3 ch ch sum End Sub 11 填补程序 假设你从今年开始为 希望工程 存钱 今年存入 100 元钱 第二年存入 200 元钱 第三年存入 300 元钱 依此类推 问 20 年时 间你将为 希望工程 存入多少钱 Dim n as integer intsum as integer intsum 0 For n 1 to intsum intsum n 100 Lb1sum caption 两年共存入 intsum 元 End Sub 4 21 y 2 Do while y2 时 f n 2f n 1 3f n 2 编程求 f 100