2015.3.11 星期三

【欢迎大家回到学校，2014-2015学年第二学期欢迎你】

教学内容：回顾假前的教学内容，了解教学进度

教学目的：收心，回忆程序设计的结构、设计思路

教学重点：顺序、分支、循环

教学难点：三段程序的演变过程

教学时间：一课时

教学方法：理论课

教学过程：

一、导入

40天左右的假期刚刚过去了，寒假里的作业完成情况调查（怎么样？）。请大家回忆一下，假前的程序设计里讲过的设计结构，还有三段程序，请试着回答下面三个问题：

１.第一段程序设计的功能

２.第一段程序与第二段程序的设计有何类似

３.第二段程序与第三段程序的设计有保演变

二、回顾

１.第一段程序的功能是“算题”

算题，就是模拟一个人出两个数，让第二个人试着算它们的和，再判断计算的结果如何！即处理A＋B＝？的问题

源程序：

clea

acce “请输入第一个数" to A

acce "请输入第二个数” to B

?　A,"+",B,"="

acce "请输入第三个数" to C

if val(a)+val(b)=val(c)

? "OK"

else

? "NO","答案是:",val(a)+val(b)

endif

return

２．第一段程序是算题，第二段程序的功能是找书，而且和数据表相关联

找书：就是输入一本书，在一张表里去找，根据查找的结果给出该书的详细信息

源程序：

clea

acce “请输入您要查找的书名:" to sm1

if len(sm1)=0

? ”你什么也没有，请查证后再执行程序"

return

endif

sele * from tushu where sm=sm1 nowait into cursor v68

if _tally=0

?"你要查找的",sm1,"不存在"

else

? "你找到了",_tally,"条"

sele v68

list

endif

return

３．第二段与第三段程序的联系是，让找书过程中，避免输入书名过程中“直接回车”造成书名为空，书名为空造成找出了很多不对的记录的结果，使用了循环程序，直到输入一本有效的书名。

源程序：

clea

do whilt .t.

acce “请输入您要查找的书名:" to sm1

if len(sm1)=0

? ”你什么也没有，请查证后再执行程序"

else

exit

endif

enddo

sele * from tushu where sm=sm1 nowait into cursor v68

if _tally=0

?"你要查找的“,sm1,"不存在"

else

? "你找到了",_tally,"条"

sele v68

list

endif

return

三、总结

１.程序设计的结构：顺序结构、分支结构、循环结构

２.程序设计过程中的数据处理，应用到了不同的变量和函数，请大家认真分析，找到该函数所在教材中的页数，并做好标记。

３.程序的功能是可以举一反三的，如第一段程序是算数；第二段就是找书；第三段是容错

四、作业

请大家把第三段程序改一下，不仅可以找一本书，还可以重复去找其他的书，如果没有输入书名（为空），则做为不再查找的条件。

2015.1.23 星期五

期末复习

复习提纲

1.数据库的相关概念、数据类型

2.数据表(自由表、数据库表）之间的区别

3.数据结构的修改、记录的编辑

4.数据表的查询(SQL)、视图及数据定义功能

5.程序设计（顺序、分支、循环）

注意：

1看笔记

2看试卷

3看作业

4看电子教案

2015.1.21

上课笔记：

求循环次数？

int【（终值-初值）/步长】+1= 循环次数

目的：通过公式来推导其他几个未知量。达到快速计算的方法。

2015.1.14

上课笔记：

1.循环三要素：初始化，条件，（使条件从真值到假值的）变化。

2.？？当行显示；？隔行显示。

3.程序如下：  

clear
i=1
x=0
do while i<=3
?"第",str(i,1),"题"
acce"no1:" to a
acce"no2:" to b
?a,"+",b,"="
acce"no3:" to c
if val(a)+val(b)=val(c)
?"yes"
x=x+1
?"您第",str(i,1),"答对了"
else
?"no",val(a)+val(b)
?"您第",str(i,1),"答错了"
endif

i=i+1
enddo
?"你已经做完了",str(i-1,1),"道题"
?"对了",str(x,1),"题"
?"错了",str(i-1-x,1),"题"

2014.1.13 星期一

教学内容：程序运行结构汇总及语法

教学目的：掌握各种程序运行结构的特点及语法

教学重点：运行控制及语句执行方向

教学难点：语句控制块的概念

教学过程：

一、导入

我们已经讲过了三段小程序。第一段，就是出题并判断结果的；第二段就是查找书目的；第三段就是加上循环功能的；

这三段程序，虽然功能简单、语句不多，但也用到了程序设计的三种结构，那就是“顺序结构、选择结构、循环结构”，今天我们就认真的归纳一下，什么是程序设计结构，每种设计结构的特点及语法调用

二、新授

1.我们先熟悉一下每段程序

1）出题程序

clea

acce “请输入第一个数" to A

acce "请输入第二个数” to B

?　A,"+",B,"="

acce "请输入第三个数" to C

if val(a)+val(b)=val(c)

? "OK"

else

? "NO","答案是:",val(a)+val(b)

endif

return

2.查找书目程序

clea

acce “请输入您要查找的书名:" to sm1

if len(sm1)=0

? ”你什么也没有，请查证后再执行程序"

return

endif

sele * from tushu where sm=sm1 nowait into cursor v68

if _tally=0

?"你要查找的",sm1,"不存在"

else

? "你找到了",_tally,"条"

sele v68

list

endif

return

3）加入循环的查找书名程序

clea

do whilt .t.

acce “请输入您要查找的书名:" to sm1

if len(sm1)=0

? ”你什么也没有，请查证后再执行程序"

else

exit

endif

enddo

sele * from tushu where sm=sm1 nowait into cursor v68

if _tally=0

?"你要查找的“,sm1,"不存在"

else

? "你找到了",_tally,"条"

sele v68

list

endif

return

2.程序运行结构

1）程序运行结构的概念、意义：

2）程序运行结构的分类：

3）结构化程序设计的三种结构：

4）三种结构的语法、形式

三、练习

1）重点分析三段程序中，每种程序结构的应用，及由些语句呈现的

哪些是顺序结构：

哪些是选择结构：

哪些是循环结构：

2）实例，找到课本中顺序结构的例题在多少页，是哪个例题

顺序结构在多少页，是例几

选择结构在多少页，是例几

循环结构在多少页，是例几

3）程序功能增加

固定循环次数的控制，循环三要素（循环变量初始化，循环条件，循环变量变化）

增加对、错题目的计数功能（s、n）

信息输出时的精确性（你做对了s道题）

程序源代码：

clea
i=1  &&循环变量赋初值
s=0  &&正确题目计数
n=0  &&错误题目计数
do whil i<=3
  ? "第",i,"题"
 
  acce "NO1" to a
  acce "no2" to b
  ? a,"+",b,"="
  acce "no3" to c
  if val(a)+val(b)=val(c)
   ? "yes"
   s=s+1 &&正确题目累加1
  else
   ? "NO",val(a)+val(b)
   n=n+1  &&错误题目累加1
  endif
 
 
   i=i+1
 enddo
 ? "你已经做完了",i-1,"道题"
 ? "做对了",s,"道题"
 ? "做错了",n,"道题"
 retu
 

四、总结

五、作业

2015.1.9

上课笔记：

1.编写程序时要在程序窗口编写，不要在命令窗口编写。

2.每个语句都执行一次，从上向下，先前后后执行的是顺序结构的程序；有条件的去执行某些语句，或者有条件的跳过某些语句是分支结构的程序；自下而上，重复执行某些语句的结构，就是循环结构。

3.sele * from tushu where sm1 = sm nowait into cursor V68，v68不用使用纯数字。

4.exit 退出； wait 等待，延时

5.程序：

clear       
do while .t.   （设条件为真，进入死循环）
acce "请输入书名:" to sm1
if len(sm1) = 0
?"您什么也没有输入"
wait ''  （等待，延时）
else     （否则，与 if 相反）
exit       （退出死循环）
retu
endif
enddo
sele * from tushu where sm1 = sm nowait into cursor v68
if _tally = 0
?"您什么都没找到"
else
?"您找到了",_tally
sele v68
list
endif
return 

do与enddo 为一套，if与endif为一套，两者不能交叉使用。

6.程序：

clear
do while .t.（设条件为真，进入死循环）
accep "请输入一个数:" to a
if a = "a"
exit    （退出死循环）
endif
accep "请输入一个数:" to b
? a,"+",b,"="
accep "请输入一个数" to c
if val(a)+val(b)=val(c)
?"ok"
else
?"no","你写错了,应该是:",val(a)+val(b)
endif
enddo
return

能用纯，，，，，，，68v68v68vvvvvvvvvvvvvvvvvvfffffffffdfsdfsdfdfsfdfffffffgggvvvv      vglhgk65256599859898945899865