必修三算法初步上机实验课
图片预览
文档简介
(共23张PPT)
算法初步上机操作实验课
课堂记录要求
遵守课堂记录要求，认真学习。
准备好课本、笔和草稿纸等必备用品。
上机操作时请大家积极参与。操作前请将要编辑的算法程序语句抄写在草稿纸上，以便具体操作时能从容以对。
上机操作时，希望大家能以最快的速度正确操作。这样才能后面的同学留下跟多的机会。
希望大家爱护多媒体教室的所有物品。
目录
一、PC中算法实现的软件简介
二、QBASIC语言简介
三、QBASIC程序操作要领
四、QBASIC中基本的算法运算符
五、案例
.数值计算（科学计算）
FORTRAN 、True BASIC、QBasic
.商业和管理
COBOL、数据库系统(dBASE、FoxBASE、Foxpro)
.人工智能
Lisp、ProLog
.系统设计
C语言、C++、
.多媒体(图、声、文技术)
Visual BASIC
.计算机网络
分布处理数据库系统：SYBASE、ORACLE
WWW文件：HTML(Hyper Text Markup Language)、Java
一、PC中算法实现的软件简介
上面这些都是我们常用来实现算法的软件，今天我们主要针对算法初步这一章给大家介绍QBASIC软件，来研究QBASIC软件是如何实现我们所学习的算法的。
二、QBASIC语言简介
QBASIC是BASIC（Beginner's All-purpose Symbolic Instruction Code，初学者通用指令代码）的缩写，是国际上广为流行的一种计算机高级语言。
QBASIC具有解释执行和编译执行方式两种版本，界面采用菜单方式的集成环境。
要学好QBASIC,除了必要的理论学习外，还要多看，多分析已经有的源程序，更重要的是注重编程实践与上机操作。
三、QBASIC程序操作要领
1、QBASIC语言运行基本操作过程
（1）启动QBASIC
其中工作窗口分为程序窗口（上）和命令窗口（下），两窗口之间的切换F6。
.
（2）输入程序
（3）运行程序
选择RUN菜单下的start或在命令窗口中输入RUN回车或按F5运行程序。如果输入程序没有错误，则可以看到运行结果，再按任意键回到编辑窗口。
（4）保存文件
选择File菜单下的save或save as命令。
（5）退出Qbasic程序
（6）打开已经存在的文件
选择File菜单下的Open命令，在弹出的对话框中选择要打开的文件名中，选择“OK”。
2、Qbasic - 快捷键
Ctrl+Break：中断正在运行的程序；
F5：继续运行被中断的程序；
Shift+F5：从第一条语句开始重新运行程序；
F4：当程序中断运行时，查看运行结果屏幕，再按一次F4则切换回代码屏幕；
F1：获得帮助。
四、QBASIC中基本的算法运算符
加 + 4+5 =9
减 - 8-3=5
乘 * 2*3=6
除 / 5/2=2.5
整除 \ 5\2=2
求余 MOD 5 MOD 2 =1
乘方 ^ 2^3=8
绝对值 Abs abs(-3)=│-3│
开根号 Sqrt sqrt(2)=√2
五、算法案例
例1
根据如图所示的程序框图，将算法语句改写为程序．
例2
【解】 用变量x，y分别表示自变量和函数值．具体算法步骤如下：
第一步：输入x的值．
第二步：判断x的范围，若x≥1，则用y＝x2＋1求函数值；否则，用y＝2x－5求函数值．
第三步：输出y的值．
例3
【解】 法一：(嵌套结构)程序框图如
图所示：
法二：(叠加结构)程序框图如图所示：
例4
画出计算12＋32＋52＋…＋9992的程序框图，并写出相应的程序．
解：(直到型循环)程序框图如图所示：
例5
求200以内(包括200)的所有偶数和，试用两种循环结构画出其程序框图并编写程序．
【分析】 偶数相加，循环变量i的初始值为2.以后每次循环都增加2.
【解】 当型循环，程序框图如图所示：
直到型循环，程序框图如图所示：
例6
设计一个算法框图：求满足1＋2 ＋ 3 ＋ … ＋ n＞10000的最小正整数n，
并写出相应的程序。
结束
输出i
i=0,s=0
开始
i = i + 1
S=S+i
S>10000
否
是
i=0
s=0
DO
i=i+1
s=s+i
LOOP UNTIL S>10000
PRINT S
END
开始
x1=1,x2=2
c=0.005
输出x
f(x1)f(x)<0
否
是
x1=x
x2=x
|x1-x2|是
否
结束
f(x)=0
否
是
用二分法求方程x^2-2=0的近似根。
例7
x1=1
x2=2
c=0.005
DO
X=(X1+X2)/2
f(x1)=x1^2-2
f(x)=x^2-2
IF f(x)=0 THEN
PRINT "方程根为："；x
ELSE
IF f(x1)*f(x)<0 THEN
x2=x
ELSE
x1=x
END IF
END IF
LOOP UNTIL ABS(x1-x2)<=c
PRINT "方程的近似根为："；x
END
例8
算法初步上机操作实验课
课堂记录要求
遵守课堂记录要求，认真学习。
准备好课本、笔和草稿纸等必备用品。
上机操作时请大家积极参与。操作前请将要编辑的算法程序语句抄写在草稿纸上，以便具体操作时能从容以对。
上机操作时，希望大家能以最快的速度正确操作。这样才能后面的同学留下跟多的机会。
希望大家爱护多媒体教室的所有物品。
目录
一、PC中算法实现的软件简介
二、QBASIC语言简介
三、QBASIC程序操作要领
四、QBASIC中基本的算法运算符
五、案例
.数值计算（科学计算）
FORTRAN 、True BASIC、QBasic
.商业和管理
COBOL、数据库系统(dBASE、FoxBASE、Foxpro)
.人工智能
Lisp、ProLog
.系统设计
C语言、C++、
.多媒体(图、声、文技术)
Visual BASIC
.计算机网络
分布处理数据库系统：SYBASE、ORACLE
WWW文件：HTML(Hyper Text Markup Language)、Java
一、PC中算法实现的软件简介
上面这些都是我们常用来实现算法的软件，今天我们主要针对算法初步这一章给大家介绍QBASIC软件，来研究QBASIC软件是如何实现我们所学习的算法的。
二、QBASIC语言简介
QBASIC是BASIC（Beginner's All-purpose Symbolic Instruction Code，初学者通用指令代码）的缩写，是国际上广为流行的一种计算机高级语言。
QBASIC具有解释执行和编译执行方式两种版本，界面采用菜单方式的集成环境。
要学好QBASIC,除了必要的理论学习外，还要多看，多分析已经有的源程序，更重要的是注重编程实践与上机操作。
三、QBASIC程序操作要领
1、QBASIC语言运行基本操作过程
（1）启动QBASIC
其中工作窗口分为程序窗口（上）和命令窗口（下），两窗口之间的切换F6。
.
（2）输入程序
（3）运行程序
选择RUN菜单下的start或在命令窗口中输入RUN回车或按F5运行程序。如果输入程序没有错误，则可以看到运行结果，再按任意键回到编辑窗口。
（4）保存文件
选择File菜单下的save或save as命令。
（5）退出Qbasic程序
（6）打开已经存在的文件
选择File菜单下的Open命令，在弹出的对话框中选择要打开的文件名中，选择“OK”。
2、Qbasic - 快捷键
Ctrl+Break：中断正在运行的程序；
F5：继续运行被中断的程序；
Shift+F5：从第一条语句开始重新运行程序；
F4：当程序中断运行时，查看运行结果屏幕，再按一次F4则切换回代码屏幕；
F1：获得帮助。
四、QBASIC中基本的算法运算符
加 + 4+5 =9
减 - 8-3=5
乘 * 2*3=6
除 / 5/2=2.5
整除 \ 5\2=2
求余 MOD 5 MOD 2 =1
乘方 ^ 2^3=8
绝对值 Abs abs(-3)=│-3│
开根号 Sqrt sqrt(2)=√2
五、算法案例
例1
根据如图所示的程序框图，将算法语句改写为程序．
例2
【解】 用变量x，y分别表示自变量和函数值．具体算法步骤如下：
第一步：输入x的值．
第二步：判断x的范围，若x≥1，则用y＝x2＋1求函数值；否则，用y＝2x－5求函数值．
第三步：输出y的值．
例3
【解】 法一：(嵌套结构)程序框图如
图所示：
法二：(叠加结构)程序框图如图所示：
例4
画出计算12＋32＋52＋…＋9992的程序框图，并写出相应的程序．
解：(直到型循环)程序框图如图所示：
例5
求200以内(包括200)的所有偶数和，试用两种循环结构画出其程序框图并编写程序．
【分析】 偶数相加，循环变量i的初始值为2.以后每次循环都增加2.
【解】 当型循环，程序框图如图所示：
直到型循环，程序框图如图所示：
例6
设计一个算法框图：求满足1＋2 ＋ 3 ＋ … ＋ n＞10000的最小正整数n，
并写出相应的程序。
结束
输出i
i=0,s=0
开始
i = i + 1
S=S+i
S>10000
否
是
i=0
s=0
DO
i=i+1
s=s+i
LOOP UNTIL S>10000
PRINT S
END
开始
x1=1,x2=2
c=0.005
输出x
f(x1)f(x)<0
否
是
x1=x
x2=x
|x1-x2|
否
结束
f(x)=0
否
是
用二分法求方程x^2-2=0的近似根。
例7
x1=1
x2=2
c=0.005
DO
X=(X1+X2)/2
f(x1)=x1^2-2
f(x)=x^2-2
IF f(x)=0 THEN
PRINT "方程根为："；x
ELSE
IF f(x1)*f(x)<0 THEN
x2=x
ELSE
x1=x
END IF
END IF
LOOP UNTIL ABS(x1-x2)<=c
PRINT "方程的近似根为："；x
END
例8