算法与程序设计复习卷_第1页
算法与程序设计复习卷_第2页
算法与程序设计复习卷_第3页
算法与程序设计复习卷_第4页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、高一信息技术算法与程序设计复习卷(一)班级 学号 姓名 .一、选择题（本题有16小题，每小题4分，共64分。选出各题中一个符合题意的正确选项，不选、多选、错选均不给分。）1、表示某展馆是否允许参观者持票进入的算法如下：totalcount = 0 馆内人数用变量totalcount表示，并将初值赋为0While totalcount b THEN a=b a=b b=t ELSE b=a END IF 16、下面左、右框内的VB程序段均能实现相同的功能，则左框内程序划线处的正确代码是【 】 If int1int2 ThenIf int1int3 Then Max=int1Else Max=in

2、t3End IfElse If int2int3 Then Max=int2 Else Max=int3 End IfEnd If Max=int1 If Maxint2 (B) Maxint3 (D) Maxint3三、程序设计题（本题有6小题，第14小题，每小题3分，第5-6小题，每小题6分，共24分）1、 有如下Visual Basic程序段：a=“Command1”b=Mid(a,4,2)c=Len(b)+Sqr(4)该程序段运行后，变量c的值为_。2、 有如下Visual Basic程序段：a=Asc(“A”)b=a+3c=Chr(b)该程序段运行后，变量c的值为_。3、 有如下Vi

3、sual Basic程序段：x=0For i=1 To 20 If (i Mod 2=0) And (i Mod 3=0) Then x=x+i End If Next iLabel1.Caption=Str(x) 该程序段运行后，在标签Label1上显示的是_。4、 有如下Visual Basic程序段：s=0i= Do While i=7 s=s+i i=i+2Loop 该程序段运行后，s的值为16，则划线处填入_。6、 最大圆面积计算。在一矩形铁皮中，裁剪出面积最大的一个圆形材料，求该圆形材料的面积。程序运行界面如右图所示。在文本框Text1和文本框Text2中分别输入矩形铁皮的宽和高，单击“计算”按钮（Command1），的文本框Text3中输出最大圆面积。解决上述问题的Visual Basic程序如下：Private Sub Command1_Click() Dim w As Single, h As Single, r As Single, s As Single w=Val(Text1.Text) h=Val(Text2.Text) If w=0 Or hh Then s=3.14*r*r .Text=Str(Int(s*100+0.5)/100) End If

人人文库> 全部分类> 教育资料 > 辅导培训

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论