VB程序设计的常用算法教案.doc
《算法与程序设计》VB教案集
《算法与程序设计》VB教案集教案集：《算法与程序设计》VB一、教学内容本节课的教学内容选自《算法与程序设计》VB教材，主要涉及第二章第四节“循环结构”的概念和应用。
具体内容包括：1. 循环结构的基本概念2. For循环和While循环的语法及使用方法3. 循环控制语句：Exit For、Exit While、Break和Continue4. 循环的嵌套及其应用二、教学目标1. 学生能够理解循环结构的基本概念，掌握For循环和While循环的语法及使用方法。
2. 学生能够熟练运用循环控制语句，解决实际问题。
3. 学生能够理解循环的嵌套，并能够应用循环嵌套解决复杂问题。
三、教学难点与重点1. 教学难点：循环控制语句Exit For、Exit While、Break和Continue的使用及循环的嵌套。
2. 教学重点：For循环和While循环的语法及使用方法，循环结构在实际问题中的应用。
四、教具与学具准备1. 教具：多媒体教学设备、计算机2. 学具：学生电脑、VB编程环境、教材《算法与程序设计》VB五、教学过程1. 实践情景引入：通过一个简单的计算器程序，让学生感受循环结构在实际编程中的重要性。
2. 理论知识讲解：讲解循环结构的基本概念，For循环和While 循环的语法及使用方法，循环控制语句Exit For、Exit While、Break 和Continue的作用。
3. 例题讲解：通过具体的例题，演示For循环和While循环的使用方法，以及循环控制语句在实际编程中的应用。
4. 随堂练习：学生独立完成课后练习题，巩固所学知识。
5. 循环嵌套讲解：讲解循环的嵌套及其应用，通过例题展示循环嵌套在实际编程中的优势。
六、板书设计板书设计如下：循环结构：1. 基本概念2. For循环语法：For循环变量 = 起始值 To 结束值 Step 步长使用方法：循环体循环控制语句：Exit For3. While循环语法：While 条件使用方法：循环体循环控制语句：Exit While4. 循环控制语句：Break：终止循环Continue：跳过当前循环，执行下一轮循环七、作业设计1. 请用For循环编写一个计算1到100之间所有整数和的程序。
VB算法与程序设计第一节教案
学案：初识VB 语言【学习目标】1、了解程序设计语言的发展历程。
2、掌握VB 编程软件的启动保存退出等基本的操作方法。
3、了解VB 的操作界面4、掌握赋值语句、打印语句的使用方法5、能在VB 编程环境操作执行一段简单的计算机程序代码。
【学习重点和难点】 重点：1、了解VB 的操作界面2、掌握赋值语句、输出语句的使用方法。
难点：掌握赋值语句、输出语句的使用方法。
【学习过程】 一、认识程序设计语言二、程序设计语言 1．VB 简介VB 是一种可视化程序设计。
可视化——让程序设计人员利用软件本身所提供的各种控件，像搭积木式地构造应用程序的各种界面，然后再编写少量的代码就可构建应用程序。
2、启动VB 的方法开始→程序→Microsoft Visual Basic6.0中文版→Microsoft Visual Basic6.0中文版在“新建工程”对话框中选择“标准EXE ”然后点击“打开”按钮3、VB 界面计算机能直接识别的语言，由0和1组成。
更接近于自然语言（英语）和数学语言的编程语言。
例如：Visual Basic汇编语言高级语言机器语言（1）控件工具箱（如图1）控件工具箱又称工具箱， 它提供的是软件开发人员在设计应用程序界面时需要使用的常用工具（控件）。
这些控件以图标的形式存放在工具箱中，软件开发人员在设计应用程序时，使用这些控件在窗体上“画”出应用程序的界面。
（2）窗体编辑窗口它是一个用于设计应用程序界面的自定义窗口。
（3）工程资源管理器（如图2）它列出了当前应用程序中包含的所有文件清单。
一个VB 应用程序也称为一个工程，由一个工程文件（.vbp ）和若干个窗体文件(.frm)组成（4）属性窗口（如图3）它主要用来在设计界面时，为所选中的窗体和窗体上的各个对象设置初始属性值。
（5）启动、中断、结束VB 程序图 2图 3图14、VB 常用语句（1）赋值语句：把指定的值赋给某个变量或某个事有属性的对象。
VB程序设计的常用算法教案
VB程序设计的常用算法教案算法（Algrith）：计算机解题的基本思想方法和步骤。
算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。
通常使用自然语言、结构化流程图、伪代码等来描述算法。
一、计数、求和、求阶乘等简单算法此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条，更要注意用来表示计数、和、阶乘的变量的初值。
例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，，6，7，8，9，0的数的个数并打印出来。
本题使用数组来处理，用数组a存放产生的确100个随机整数，数组x来存放个位上的数字分别为1，2，3，4，，6，7，8，9，0的数的个数。
即个位是1的个数存放在x中，个位是2的个数存放在x中，……个位是0的个数存放在x。
将程序编写在一个GetTput过程中，代码如下：PubliSubGetTputDiaAsIntegerDixAsIntegerDiiAsInteger,pAsInteger'产生100个[0，99]范围内的随机整数，每行10个打印出来Fri=1T100a=IntIfa<10ThenFr1PrintSpae;a;ElseFr1PrintSpae;a;EndIfIfid10=0ThenFr1PrintNexti'统计个位上的数字分别为1，2，3，4，，6，7，8，9，0的数的个数，并将统计结果保存在数组x,x,,x中，将统计结果打印出来Fri=1T100p=ad'求个位上的数字Ifp=0Thenp=10x=x+1NextiFr1Print&qut;统计结果&qut;Fri=1T10p=iIfi=10Thenp=0Fr1Print&qut;个位数为&qut;+Str+&qut;共&qut;+Str)+&qut;个&qut;NextiEndSub二、求两个整数的最大公约数、最小公倍数分析：求最大公约数的算法思想：对于已知两数，n，使得>n；除以n得余数r；若r=0，则n为求得的最大公约数，算法结束；否则执行；←n，n←r，再重复执行。
VB程序设计教案(详细)
VB程序设计教案(详细)VB程序设计教案(详细)1. 课程介绍1.1 课程概述本课程旨在教授学生如何使用VB（Visual Basic）语言进行程序设计。
课程将涵盖VB的基础知识、语法和常用编程技巧，以及如何开发简单的应用程序和界面设计。
1.2 课程目标- 了解VB语言的基础知识和编程概念- 能够使用VB语言编写简单的程序- 掌握VB的界面设计和用户交互技巧- 能够进行程序调试和错误处理- 能够应用VB开发简单的实际应用程序2. 课程大纲2.1 第一章：VB入门2.1.1 VB的基本概念2.1.2 VB的开发环境介绍2.1.3 创建第一个VB程序2.2 第二章：VB基础知识2.2.1 数据类型与变量2.2.2 运算符与表达式2.2.3 控制结构与循环语句2.2.4 过程与函数2.2.5 数组与集合2.3 第三章：VB界面设计2.3.1 窗体与控件2.3.2 窗体的布局与设计2.3.3 控件的属性与事件2.3.4 表单的验证与提示2.4 第四章：VB高级编程技巧2.4.1 文件操作2.4.2 数据库连接与操作2.4.3 错误处理和调试技巧2.4.4 高级用户交互与界面设计3. 授课方法3.1 理论讲解：通过课堂讲解，介绍VB的基本概念、语法和编程技巧。
3.2 实例演示：通过实际案例演示，让学生理解和掌握VB的应用和开发能力。
3.3 实践训练：布置编程练习和项目任务，让学生在实际应用中提升技能。
4. 评分标准4.1 平时成绩：包括课堂表现、作业完成情况和参与度等。
4.2 考试成绩：根据期末考试结果进行评定。
4.3 项目成绩：根据实际项目完成情况和质量进行评定。
5. 资源要求5.1 软件环境：Windows操作系统，VB开发环境（如Visual Studio等）。
5.2 教材：《VB程序设计入门》等相关教材。
5.3 附件：本课程附件包括示例代码、实例项目以及参考资料，供学生参考和练习。
6. 法律名词及注释6.1 版权：指对作品享有的独占使用权的权利。
VB程序设计教案(详细)
VB程序设计教案(详细)VB程序设计教案(详细)1.引言- 学习目标：本教案旨在培养学生在VB（Visual Basic）程序设计方面的基本能力，掌握VB语言的基本语法和常用功能，能够独立开发简单的VB程序。
- 适用对象：对VB程序设计感兴趣且有一定编程基础的学生。
- 主要内容：介绍VB程序设计的基本原理和步骤，包括界面设计、事件监听、数据处理等方面的内容。
2.环境搭建- 安装VB IDE：介绍如何并安装VB IDE（集成开发环境）。
- 新建项目：演示如何在VB IDE中新建一个项目并设置基本属性。
- 界面布局：讲解VB中的用户界面元素，如窗体、按钮、标签等，并介绍如何进行布局和调整位置。
3.基本语法- 变量和数据类型：介绍VB中的不同数据类型及其用法，如整型、浮点型、字符串型等。
- 运算符和表达式：讲解VB中常用的运算符和表达式，如算术运算符、逻辑运算符等。
- 控制流程：介绍条件语句和循环语句的使用方法，如if 语句、for循环、while循环等。
4.事件处理- 事件监听：讲解如何给按钮等组件添加事件监听器，并介绍常用的事件类型，如事件、键盘事件等。
- 事件处理方法：介绍在事件处理函数中常用的操作，如界面更新、数据处理等。
5.数据处理- 数组：讲解VB中的数组的概念和使用方法，包括一维数组和多维数组。
- 输入和输出：介绍如何从用户获取输入并输出结果，包括控制台输入输出和界面输入输出。
6.综合实例- 游戏开发：以一个简单的游戏开发为例，演示如何使用VB进行综合性的程序设计。
附件：附件1：示例代码-界面设计.vb附件2：示例代码-事件处理.vb附件3：示例代码-数据处理.vb法律名词及注释：1.版权：知识产权法规定的保护原创作品的权利，包括文本、图像、音频等。
2.IDE：集成开发环境（Integrated Development Environment），指一款提供软件开发环境的应用程序，包括代码编辑器、编译器等功能。
VB程序设计教案(详细)
VB程序设计教案(详细)VB程序设计教案（详细）一、课程目标本课程的目标是教授学生如何使用VB（Visual Basic）进行程序设计。
通过本课程的学习，学生将能够掌握VB的基本概念、语法和编程技巧，并能够独立完成简单的程序设计任务。
二、课程大纲1： VB简介- VB的起源和发展- VB的特点和优势- VB与其他编程语言的比较2： VB环境设置和基本操作- VB开发环境的安装和配置- VB集成开发环境（IDE）的介绍- VB项目的创建和管理- VB代码的编辑和调试技巧3： VB程序基础- VB程序的结构和执行过程- 变量和数据类型- 运算符和表达式- 控制流程和循环结构4： VB用户界面设计- VB窗体的创建和布局- 控件的选择和使用- 事件处理和交互设计- 窗体的美化和样式设置5： VB文件操作- 文件的读写和处理- 文件路径和文件操作函数- 文件输入输出流的使用- 文本文件和二进制文件的处理6： VB数据库编程- 数据库的连接和操作- SQL查询语句的编写- 数据库表的创建和修改- 数据库事务的处理7： VB高级编程技巧- 函数和过程的定义和调用- 类和对象的使用- 错误处理和调试技巧- VB常用的扩展库和插件8： VB项目实践- 案例分析和实际项目- 项目需求分析和设计- 项目开发和测试- 项目发布和维护三、教学方法本课程采用理论讲解与实际操作相结合的教学方法。
讲师将通过实例演示和实践操作，让学生亲身体验VB程序设计的过程。
同时，还将组织小组讨论和实践项目，以加深学生的理解和实际应用能力。
四、评估方法学生的评估将通过以下几个方面进行：- 平时作业和实验报告的完成情况和质量- 课堂讨论和互动参与程度- 期末项目的完成情况和成果展示附件：1：示例程序代码3：课程作业要求法律名词及注释：1：版权：指著作权法保护的创作成果的独有权利。
2：商标：指商标法保护的标志、名称、符号等用于区分商品或服务来源的独有标识。
算法与程序设计》VB教案集
算法与程序设计》VB教案集一、教学目标1. 知识与技能：（1）理解算法与程序设计的基本概念；（2）掌握VB编程环境及基本操作；（3）学会使用VB编写简单的程序。
2. 过程与方法：（1）通过实例了解算法在程序设计中的应用；（2）学会使用VB编写算法程序；（3）培养学生的创新意识和问题解决能力。
3. 情感态度与价值观：（1）激发学生对算法与程序设计的兴趣；（2）培养学生团队合作、积极探究的精神；（3）提高学生运用计算机技术解决实际问题的能力。
二、教学内容1. VB编程环境及基本操作（1）认识VB集成开发环境；（2）熟悉VB中的基本概念，如窗体、模块、事件等；（3）掌握VB的基本操作，如变量声明、数据类型、运算符等。
2. 顺序结构程序设计（1）了解算法的基本结构；（2）学会使用VB编写顺序结构程序；（3）通过实例掌握顺序结构程序的设计方法。
3. 选择结构程序设计（1）了解选择结构的基本概念；（2）学会使用VB编写选择结构程序；（3）通过实例掌握选择结构程序的设计方法。
4. 循环结构程序设计（1）了解循环结构的基本概念；（2）学会使用VB编写循环结构程序；（3）通过实例掌握循环结构程序的设计方法。
5. 算法与程序设计综合应用（1）分析实际问题，设计算法；（2）利用VB实现算法程序；（3）通过实例培养学生的问题解决能力和创新意识。
三、教学重点与难点1. 教学重点：（1）VB编程环境及基本操作；（2）顺序结构、选择结构、循环结构程序设计；（3）算法与程序设计的基本方法。
2. 教学难点：（1）循环结构的嵌套使用；（2）算法复杂度的分析；（3）创新程序设计。
四、教学方法与手段1. 教学方法：（1）采用案例教学法，让学生通过实际操作掌握知识；（2）运用启发式教学，引导学生主动探究问题；（3）组织小组合作，培养学生的团队协作能力。
2. 教学手段：（1）利用多媒体课件进行讲解；（2）借助网络资源，丰富教学内容；（3）使用编程软件（如VB），进行实机操作演示。
VB教案(全套)(完整资料).doc
形成性测试1、把vb工具箱中的每个控件的英文名对应的中文名标注出来小结本课我们主要学习vb程序的基本知识：一、启动与退出vb二、认识vb工作环境Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。
板书设计第一课vb 开发环境简介一、认识vb二、演示示例程序作业练习形成性测试1、把vb工具箱中的每个控件的英文名对应的中文名标注出来小结本课我们主要学习vb程序的基本知识：一、启动与退出vb二、认识vb工作环境Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。
板书设计第一课vb 开发环境简介一、认识vb二、演示示例程序作业P课后反思课题第2课编一个简单的程序课类信息技术教学目标1、知识目标：●熟悉标签控件、命令按钮控件●熟悉修改控件属性的基本方法●学会测试程序并掌握生成可执行文件的操作2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。
教学过一、分析示例程序“欢迎”程该程序由一个标签控件，一个命令按钮控件组成二、编写“欢迎”程序1、设计程序界面1.1创建新工程1.2 设计窗体：一个标签控件，一个命令控件2、修改对象属性对象属性属性值Form1 （名称）欢迎Label1 Caption 你好，欢迎学习程序设计CommanCaption 退出d13、编写代码Private sub command1_click()EndEnd sub4、调试并保存程序5、生成可执行文件形成性1、编写一个“自我介绍”的程序测试标●熟悉标签控件、命令按钮控件●熟悉修改控件属性的基本方法●学会测试程序并掌握生成可执行文件的操作2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB程序设计的常用算法教案算法（algorithm）：计算机解题的基本思想方法和步骤。
算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。
通常使用自然语言、结构化流程图、伪代码等来描述算法。
一、计数、求和、求阶乘等简单算法此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条件，更要注意用来表示计数、和、阶乘的变量的初值。
例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。
本题使用数组来处理，用数组a(1 to 100)存放产生的确100个随机整数，数组x(1 to 10)来存放个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数。
即个位是1的个数存放在x(1)中，个位是2的个数存放在x(2)中，......个位是0的个数存放在x(10)。
将程序编写在一个gettjput过程中，代码如下：public sub gettjput()dim a(1 to 100) as integerdim x(1 to 10) as integerdim i as integer, p as integer'产生100个[0，99]范围内的随机整数，每行10个打印出来for i = 1 to 100a(i) = int(rnd * 100)if a(i) < 10 thenform1.print space(2); a(i);elseform1.print space(1); a(i);end ifif i mod 10 = 0 then form1.printnext i'统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数，并将统计结果保存在数组x(1),x(2),...,x(10)中，将统计结果打印出来for i = 1 to 100p = a(i) mod 10 ' 求个位上的数字if p = 0 then p = 10x(p) = x(p) + 1next iform1.print "统计结果"for i = 1 to 10p = iif i = 10 then p = 0form1.print "个位数为" + str(p) + "共" +str(x(i)) + "个"next iend sub二、求两个整数的最大公约数、最小公倍数分析：求最大公约数的算法思想：(最小公倍数=两个整数之积/最大公约数)2017-08-02算法（algorithm）：计算机解题的基本思想方法和步骤。
算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。
通常使用自然语言、结构化流程图、伪代码等来描述算法。
一、计数、求和、求阶乘等简单算法此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条件，更要注意用来表示计数、和、阶乘的变量的初值。
例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。
本题使用数组来处理，用数组a(1 to 100)存放产生的确100个随机整数，数组x(1 to 10)来存放个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数。
即个位是1的个数存放在x(1)中，个位是2的个数存放在x(2)中，......个位是0的个数存放在x(10)。
将程序编写在一个gettjput过程中，代码如下：public sub gettjput()dim a(1 to 100) as integerdim x(1 to 10) as integerdim i as integer, p as integer'产生100个[0，99]范围内的随机整数，每行10个打印出来for i = 1 to 100a(i) = int(rnd * 100)if a(i) < 10 thenform1.print space(2); a(i);elseform1.print space(1); a(i);end ifif i mod 10 = 0 then form1.printnext i'统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数，并将统计结果保存在数组x(1),x(2),...,x(10)中，将统计结果打印出来for i = 1 to 100p = a(i) mod 10 ' 求个位上的数字if p = 0 then p = 10x(p) = x(p) + 1next iform1.print "统计结果"for i = 1 to 10p = iif i = 10 then p = 0form1.print "个位数为" + str(p) + "共" +str(x(i)) + "个"next iend sub二、求两个整数的最大公约数、最小公倍数分析：求最大公约数的算法思想：(最小公倍数=两个整数之积/最大公约数)2017-08-02算法（algorithm）：计算机解题的基本思想方法和步骤。
算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。
通常使用自然语言、结构化流程图、伪代码等来描述算法。
一、计数、求和、求阶乘等简单算法此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条件，更要注意用来表示计数、和、阶乘的变量的初值。
例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。
本题使用数组来处理，用数组a(1 to 100)存放产生的确100个随机整数，数组x(1 to 10)来存放个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数。
即个位是1的个数存放在x(1)中，个位是2的个数存放在x(2)中，......个位是0的个数存放在x(10)。
将程序编写在一个gettjput过程中，代码如下：public sub gettjput()dim a(1 to 100) as integerdim x(1 to 10) as integerdim i as integer, p as integer'产生100个[0，99]范围内的随机整数，每行10个打印出来for i = 1 to 100a(i) = int(rnd * 100)if a(i) < 10 thenform1.print space(2); a(i);elseform1.print space(1); a(i);end ifif i mod 10 = 0 then form1.printnext i'统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数，并将统计结果保存在数组x(1),x(2),...,x(10)中，将统计结果打印出来for i = 1 to 100p = a(i) mod 10 ' 求个位上的数字if p = 0 then p = 10x(p) = x(p) + 1next iform1.print "统计结果"for i = 1 to 10p = iif i = 10 then p = 0form1.print "个位数为" + str(p) + "共" +str(x(i)) + "个"next iend sub二、求两个整数的最大公约数、最小公倍数分析：求最大公约数的算法思想：(最小公倍数=两个整数之积/最大公约数)2017-08-02算法（algorithm）：计算机解题的基本思想方法和步骤。
算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。
通常使用自然语言、结构化流程图、伪代码等来描述算法。
一、计数、求和、求阶乘等简单算法此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条件，更要注意用来表示计数、和、阶乘的变量的初值。
例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。
本题使用数组来处理，用数组a(1 to 100)存放产生的确100个随机整数，数组x(1 to 10)来存放个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数。
即个位是1的个数存放在x(1)中，个位是2的个数存放在x(2)中，......个位是0的个数存放在x(10)。
将程序编写在一个gettjput过程中，代码如下：public sub gettjput()dim a(1 to 100) as integerdim x(1 to 10) as integerdim i as integer, p as integer'产生100个[0，99]范围内的随机整数，每行10个打印出来for i = 1 to 100a(i) = int(rnd * 100)if a(i) < 10 thenform1.print space(2); a(i);elseform1.print space(1); a(i);end ifif i mod 10 = 0 then form1.printnext i'统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数，并将统计结果保存在数组x(1),x(2),...,x(10)中，将统计结果打印出来for i = 1 to 100p = a(i) mod 10 ' 求个位上的数字if p = 0 then p = 10x(p) = x(p) + 1next iform1.print "统计结果"for i = 1 to 10p = iif i = 10 then p = 0form1.print "个位数为" + str(p) + "共" +str(x(i)) + "个"next iend sub二、求两个整数的最大公约数、最小公倍数分析：求最大公约数的算法思想：(最小公倍数=两个整数之积/最大公约数)2017-08-02算法（algorithm）：计算机解题的基本思想方法和步骤。