程序设计的基本结构.

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

条件

语句1
语句2
选择结构形式(双分支) 双分支选择结构: IF 条件 THEN 语句 ELSE 语句 END IF

条件

语句1
例: 语句2 DIM X AS INTEGER DIM Y AS INTEGER X=INPUTBOX(“请输入数据”) IF X>10 THEN Y=X^2 ELSE Y=X+2 END IF PRINT “Y=”,Y
例: DIM X AS INTEGER DIM Y AS INTEGER X=INPUTBOX(“请输入数据”) IF X>10 THEN Y=X^2 ELSEIF X<9 THEN Y=X+2 ELSE Y=X^3 END IF PRINT “Y=”,Y
返回
火箭发射
开始
输入速度
Dim V as single V =inputbox(“请输入速度”) IF V>=7.91 THEN PRINT “发射成功” ELSE PRINT “发射失败” END IF
选择结构形式(多分支) 多分支选择结构: 否 IF 条件1 THEN 语句 条件1 ELSEIF 条件2 否 THEN 语句 是 条件2 ELSEIF 条件3 否 THEN 语句 是 语句2 条件3 …… ELSE 语句 …… 语句3 END IF

语句1
选择结构形式(多分支) 多分支选择结构: IF 条件 THEN 语句 ELSEIF 条件2 THEN 语句 ELSEIF 条件3 THEN 语句 …… ELSE 语句 END IF
获取当前年份
输入输 出标志
年份差值 打印年龄
一般执行 语句标志
结束
返回
已知圆周率额为3.14,输入半径,求圆的面积
开始
开始结 束标志
输入半径
Dim S as single Dim R as single R=inputbox(“请输入半径”) S=3.14*R^2 PRINT “圆的面积是”,S
S=∏R2
N
V>=7.91
Y
发射失败 发射成功
结束
返回
三、循环结构
1、特点:重复执行某一段程序代码,直 到符合条件时才退出执行,主要借助 FOR……NEXT语句和DO WHILE……LOOP语 句来实现。
2、Байду номын сангаас构形式 3、例子:
韩信点兵
循环结构形式(for……next) FOR……NEXT 语句实现循环
DIM S AS INTEGER DIM i AS INTEGER S = 0 FOR i=1 TO 100 S = S + i NEXT i PRINT “S=”,S 计算1+2+……100的和
输入输 出标志
打印S
结束
一般执行 语句标志
返回
二、选择结构
1、特点:根据不同的条件判断来决定程 序执行走向的结构,主要借助IF、THEN、 ELSE来构成选择结构。 2、结构形式 3、例子:
火箭发射
循环结构
选择结构形式(单分支)
单分支选择结构: IF 条件 THEN 语句 END IF
例: DIM X AS INTEGER DIM Y AS INTEGER X=INPUTBOX(“请输入数据”) IF X>10 THEN Y=X^2 END IF PRINT “Y=”,Y
条件
N
Y
语句1
语句2
返回
韩信点兵
开始
初始化
I同时整除 3、 5、 7余 2、 3、 2
DIM N AS INTEGER N=1
Y
N I=I+1
打印
结束
DO IF (N MOD 3=2)AND (N MOD 5=3)AND (N MOD 7=2) THEN PRINT N EXIT DO END IF N=N+1 LOOP
返回
韩信点兵(改进算法)
开始
初始化
I同时整除 3、5、7余2、 3、2
Y
N
I>1000
N I=I+1 打印 I=I+1
结束
Y
DIM i AS INTEGER i=1 DO IF (i MOD 3=2)AND (i MOD 5=3)AND (i MOD 7=2) THEN PRINT i END IF IF i>1000 THEN EXIT DO END IF i=i+1 LOOP
程序设计的基本结构
顺序结构 选择结构 循环结构
一、顺序结构
1、特点:从上往下依次执行。程序执行 过程中没有分支、没有重复,顺序结构是 一种最基本、最简单的程序结构。 2、结构形式 3、例子:
计算年龄 求圆面积
选择结构
顺序结构形式
语句1
语句2
语句3
返回
计算年龄
开始
输入出生 日期
开始结 束标志
Dim M as date Dim N as date Dim H as integer M =inputbox(“出生日期”) N =date() H =year(N) - year(M) PRINT “你的年龄是”,H
条件
N
Y
语句1
语句2
循环结构形式(do while……loop) DO WHILE……LOOP 语句实现循环
DIM S AS INTEGER DIM i AS INTEGER S = 0,i=0 DO WHILE i<=100 i = i + 1 S = S + i LOOP PRINT “S=”,S 计算1+2+……100的和
相关文档
最新文档