《程序与程序设计语言》课件.ppt

本资料来自于资源最齐全的２１世纪教育网 程序与程序设计语言 《算法与程序设计》 第一章 解开计算机解决问题的神秘面纱 第三节 回顾上一节课 在编程领域，算法可以进一步定义为什么？ 算法有哪五个特征？ 算法就是用计算机求解某一问题的方法，是能被机械地执行的动作或指令的有穷集合。 0个或多个输入、至少1个输出、有穷性、确定性和可行性。 1、程序的概念 程序是一组机器操作的指令或语句序列，是算法的一种描述。 【随堂练习】 某工厂2005年的年生产总值为200万元，技术革新后预计以后每年的年生产总值都比上一年增长5%，设计一个程序框图，输出预计年生产总值超过300万元的最早年份。 算法提示 第一步，输入2005年的年生产总值； 第二步，计算下一年的年生产总值； 第三步，判断所得的结果是否大于300，若是，则输出该年份；否则，返回第二步。 开始 结束 n=2005 a=200 t=a×0.05 a=a+t n=n+1 a300? 输出n N Y 开始 结束 n=2005 a=200 t=a×0.05 a=a+t n=n+1 a300? 输出n N Y 求解“最早年份”的算法与程序 算法 程序 Private Sub Command1_Click() (1)指定n和a的初始值 n = 2005 a = 200 Do (2)求下一年增长值t = a * 0.05 t = a * 0.05 (3)求出下一年生产的总值 a = a + t a = a + t (4)求出下一年的年份 n = n + 1 n = n + 1 (5)判断年生产总值是否超过300万元 Loop Until a 300 (7)输出年生产总值超过300万元的最早年份 Print 预计年生产总值超过300万元的最早年份是:; n (5)结束。 End Sub 示例：输入一个整数a，判断是否为偶数，是偶数时输出“yes”，否则输出“no”。（用伪代码描述）。 算法： 输入 a If a 能被2整除 Then 输出“yes” Else输出“no” End if 【随堂练习】 求解“判断是否为偶数”的算法与程序 算法 程序 Private Sub Command1_Click() (1) 输入 a a = InputBox(a=, 输入一个整数a) (2) If a 能被2整除 Then 输出“yes” If a Mod 2 = 0 Then Print YES (3) Else输出“no” Else Print NO (4) End if End If (5)结束。 End Sub 【随堂练习】 操作题 有10个评委为参赛选手打分。评分时，去掉最高分和最低分，算出其余8个分数的平均分，作为该选手的得分。请设计一算法，从键盘输入10个评委给的分数，输出选手的得分。 设：MAX为评委给出的最高分；MIN为评委给出的最底分；N为评委给出的分数个数；X为评委给出的分数；S为评委分数总和。 用伪代码描述如下： N=1 S=0 输入第一个评委给出的分数→X S=S+X MAX=X MIN=X N=N+1 IF N10 THEN 输出 （S-MAX-MIN）/8；结束 ELSE 输入下一个评委给出的分数→X S=S+X IF XMAX THEN MAX=X IF XMIN THEN MIN=X 返回”N=N+1”这一步 END IF Private Sub Command1_Click() Dim max As Double, min As Double, n As Double, x As Double, s As Double, y As Double n = 1 s = 0 x = InputBox (第1个评委给出的分数=, 请输入第1个评委给出的分数) s = s + x max = x min = x redo: n = n + 1 If n 10 Then y = (s - max - min) / 8 Print 该选手的得分为：; y; 分 Else x = InputBox(第 (n) 个评委给出的分数=, 请输入第 (n) 个评委给出的分数) s = s + x If x max Then max = x End If If x min Then min