QBASIC培训教程.doc

QBASIC培训教程 作者：admin 文章来源：本站原创 点击数： 更新时间：2004-10-21 (书本以信息学奥林匹克竞赛辅导（湖北教育出版社出版） 为标准教材) 第一课时 内容P92P93 过程：1、QB的初步认识 练习：尝试模仿写出一个求长方形的周长的程序。长为12，宽为6 REM 求长方形的周长 CLS LET A=12 LET B=6 LET C=(A+B)*2 PRINT C END 2、字符集 3、常量。重点讲了一下科学计数法的表示。 练习：把下列各数写成科学计数法表示的形式。 例:1360000000001.36*10111.36E+11 356000000000 0.00000000000000132 -0.000000000000000000001 第二课时 内容：P95-P96 过程：1、变量。构成、规定等，重点讲一下变量名的命名，如哪些不能做为变量名等。 练习：下面哪些可作变量，哪些不能？ 7*B aBC x2y x-y Print K=6 其中的Print可说明是保留字，同PRINT 2、标准函数：讲解四个标准函数：ABS(X) SQR(X) INT(X) SGN(X) 练习：已知A=7 B=-3.14 C=0.92 D=18,求： ABS(B+C) INT(A+B) INT(A)+INT(B) INT(SQR(A+D) INT(SQR(A+B+C+D) SGN(C-D) 讲解：INT(SQR(A+B+C+D)=INT（SQR（7-3.14+0.92+18）=INT(SQR(22.78)=4 是因为22.78在16与25之间，取整的话只能取4。 第三课时 1、 复习上一天所学，用时20分钟。 2、 讲解最后一个标准函数RND（X）。功能及说明。 3、 例：输出二个0到100之间的随机整数。 可用RND*100取0到100之间的数。 PRINT INT(RND*100), INT(RND*100) 练习：输出一个510之间的随机整数。 提示：05与510之间的联系。 可用下面的语句： INT（RND*5）+5 INT（RND*5+5） 练习2、 A/B的商、余数的表示。 商：INT（A/B） 余数=被除数除数*商 A-B*INT（A/B） 第四课时 1、 表达式。 组成、算术运算符和表达式。 2、 练习：用QB语言表示下列表达式： 53（200-2）（20+1）+5 5（16-2/15）（124） 7 3、 运算顺序的讲解。 4、 练习： （1） 写出下列式子的QB表达式： （X2+1）3 （A-B）（X-Y） 3670+（12+5/12）3 （2） 求下列表达式的值： 52 MOD 130/45 (ABS(-6)/4)*SQR(81) 第五课时 1、复习上一天所学，解决学生提出的问题。 2、关系运算 格式： 值只有两种：真用“-1”表示，假用“0”表示。 举几个例子进行说明。 4、 逻辑运算的适当讲解，并加以总结 AND：全真为真，有假为假 OR：全假为假，有真为真。 练习：下面4个关系表达式中结果为真的是：（ ） A. “A”“a” B. “THAT” “THE” C. 9”H” 写出下列表达式的值： xy AND yz xy and z 当E=1，F=3，G=5，求下面表达式的值 NOT(3*EG MOD 2*5+3) AND GF+4G-F-E =NOT(35 MOD 10+3) AND 53+41 =NOT (35+3) AND 51 =NOT 0 AND 0 OR 0 = 1 AND 0 OR 0 =0 92 MOD 2522 第六课时 1、上节课的练习进行核对。 2、赋值语句（LET）的讲解。见教材P102P104 练习：（1）、找错误，并改正。 LET A+B=C LET A=1,B=3 , C=5 LET A,B=2,3 (2)、写出程序的运行结果。 LET A=345 LET B=456 LET X=A+B PRINT A,B,X,X,B,A LET A=5 LET B=10 LET A=A+B LET B=B+A PRINT A,B LET A=A+B LET B=B+A PRINT A;B END 第七课时 1、 复习。继续LET语句未讲完、有问题的地方。 2、 输出语句（PRINT）的讲解。教材P104P105 3、 语句的格式、功能分别进行讲解，举书上的例题。 4、 练习： 写出下列程序的运行结果： (1) LET Y=7.8 PRINT “Y=”;Y (2) PRINT “X*Y=”;24*2 PRINT PRINT “*” (3) PRINT A,B,C 没赋值的话均为0 (4) LET A=8 LET B=A+18 LET C=A LET D=B PRINT A,B END (5) PRINT “ABC”, “1234”, “&”, “XYZ” PRINT 11,22,33,44, 55 END 以上例题分开出，出1题讲一题 第八课时 1、 上节课的练习进行核对。 2、 重点讲解TAB（X）函数的应用。见教材P106107 3、 练习： （1） 如果后一个TAB（X）的值小于前一个TAB（X）的值，其输出结果会怎样？ 如： PRINT TAB（3）；“ABCDEFG”；TAB（40）；“12345678”；TAB（25）；“*” 运行结果： ABCDEFG 12345678 * （2） 如果输出项之间用逗号“，”分隔，输出结果会怎样？ 如：PRINT TAB（3）；24，TAB（10）；“ABC”，TAB（40）；12/4 运行结果： 24 ABC 3 4、 课堂练习：写运行结果： （1） PRINT TAB（5）；“*”；TAB（20）；“*”；TAB（4）；“*”；TAB（14）；“*” （2） PRINT TAB（18）；“通讯录” PRINT TAB（17）；“_” PRINT “学校，班级”，“姓 名”；“性别”；“任课老师” END 第九课时 1、 键盘输入语句（INPUT）的格式、功能说明。 2、 例：输入四科成绩求总分和平均分 INPU Y,S, W, Z LET ZF=Y+S+W+Z LET PJF=ZF/4 PRINT “ZF=”;ZF, “PJF=”;PJF END 3. INPUT语句的执行过程. 4. INPUT语句的应用1. 例:为某商场设计一个购物付款结算的程序. (1) 先设变量 HW$、DJ、SL分别表示货物的名称、单价、数量。 (2) 付款=单价*数量 即FK=DJ*SL (3) 程序： INPUT “货物名称、单价、数量：”；HW$，DJ，SL LET FK=DJ*SL PRINT HW$，DJ，SL PRINT FK：“元” END （4）运行程序： RUN 货物名称、单价、数量？苹果，8.5，2 （划线为键盘输入） 苹果 8.5 2 17元 练习：用INPUT语句设计一个程序，帮家里计算每月的用电费用。 提示：如每月用电120度，电费为0.5元/度。 写出下面程序的运行结果： INPUT “A，B，C，D=：” A，B，C，D LET PJ=（A+B+C+D）/4 PRINT“PINGJUN=”；PJ END 输入12，34，56，18 第十课时 1、 上节课的练习进行讲解。 2、 讲解教材P109例2。 3、 使用INPUT语句的几点说明，分三点说明，具体见教材。 4、 练习： （1） 找出错误，并改正： INPUT A，B，C， INPUT S；Q；Z INPUT “A，B=”A，B，“C，D=”；A，B INPUT S=30，H=50 （2） 写出下面程序的运行结果： INPUT “X，Y=”；X，Y PRINT “X=”；X，“Y=”；Y LET X=X+Y ：Y=X-Y：X=X-Y PRINT “X=”；X，“Y=”；Y INPUT B，C LET D=（B*C）/2 PRINT B，C，D INPUT A$, X, Y,B$ PRINT A$, B$ PRINT X,Y (以上的数据由学生课堂上随机给出，还可互相出题。) 第十一课时 1、 上节课内容复习 2、 读数/置数语句（READ/DATA）的简短说明。 3、 READ/DATA语句的格式、功能说明、执行过程。（教材P111） 4、 练习：找出错误、并改正。 READ A,B;C;D DATA 2,3,5,33 READ B$, C$, X, Y DATA ABC, “101”,25,3/5 READ A1,A2,A3,A4 DATA 2,4,6 READ B1,B2,B3,B4 DATA 3,0.245,23,14，20 5、 写程序运行结果： DATA 1，2 READ A，B，C RESTORE READ E，F，G DATA 3，4，5，6 READ X，Y，Z PRINT A，B，C，D，E，F，G，X，Y，Z END 第十二课时 1、程序设计初步。出示P114的例1。分析：设六年级植树棵数为A，五年级植树棵数为B，四年级棵数为C，一、二、三年级共植树棵数为D，全校学生总共植树的棵数为S 。 A=300 B=A*2/3 C=B-90 D=（A+B+C）/2 S=A+B+C+D 通过分析、列表达理清了解题思路，就可以着手编写程序，让计算机算出本题的结果。 程序编写如下： LET A=300 LET B=A*2/3 LET C=B-90 LET D=（A+B+C）/2 LET S=A+B+C+D PRINT “S=”；S END 运行程序： S=915 2、程序设计的一般步骤是： （1） 分析问题，明确任务； （2） 建立数学模型，确定解题方法； （3） 画出流程图； （4） 编写程序； （5） 上机调试程序。 3、 鸡兔同笼，已知中共有头35个，脚94只，求鸡、兔各几只？ 鸡.兔同笼问题 （） （） 鸡；，兔； 4、 学生练习：用INPUT和READ/DATA语句为变量赋值，分别编写程序。 第十三课时 1、流程图简介 让学生了解常用的流程图编制符号及含义。P117 2、三种基本结构。 （1）顺序结构 （2）选择结构 （3）循环结构 对以上的三种结构进行适当的了解，用流程图的形式进行表示，争取让学生掌握。 3、练习：林中有鹤X只，有鹿Y只，已知鹤和鹿总头数为H，总脚数为F，问林中的鹤和鹿共有多少只？ 提示：常识告诉我们，鹤有2只脚，鹿有4知脚。根据数学知识可以列出以下算式： X+Y=H 2X+4Y=F 由2式1式： 有 2Y=F2H 则 Y=F2H2 412式： 有 2X=4HF 则 X=4H-F2 设H=71，F=158 请用语句LET，键盘输入语句INPUT，读数语句READ、DATA为变量赋值个分别编写程序求解。 第十四课时 1、 路选择结构（IF语句）的初步介绍。 一般格式： IF THEN ELSE 注意：编程时该语句只准在一行上写完。 2、 举例：（1）将Y和X中较大的数送到Z中，用单行IF语句描述为： IF XY THEN z=x ELSE z=y （2）求A的绝对值：IF ATHEN X+1 ELSE X-1 （2）IF A100 THEN LET A=A+A; PRINT A ELSE PRINT X2 4、某校学生进行计算机知识竞赛，成绩在80分以上的可以获奖 ，并打印“获奖了”，小于80分的，给 予鼓励打印“再加把劲”。 第十五课时 1、 单行IF语句的复习，引入多行IF语句 2、多行IF语句的一般格式:（要求学生注意书写格式） IF THEN ELSE END IF 多行IF语句的含义是:计算关系表达式的值,当其值为真时,执行THEN后面的语句块1;否则(条件为假),执行ELSE后面的语句块2.若没有ELSE部分,则关系表达式的值为假时,便退出本多行IF语句。 3、举例： 输入三个整数a.b.c,要求输出三个数中大小居中的数. 分析: (1) 先将a.b两数进行比较,如果ab,再比较b.c,如果bc,则输出b. 否则,bb的条件不成立,既ac,输出a. 否则,比较b.c,如果bc,则输出c,否则,输出b. 程序如下: INPUT “输入a,b,c”;a,b,c IF ab THEN IF bc THEN PRINT b ELSE IF ac THEN PRINT c ELSE PRINT a END IF ELSE IF ac THEN PRINT a ELSE IF bc THEN PRINT c ELSE PRINT b END IF END IF END 运行结果 输入 a,b,c? 35，29，30 30 学生练习：输入A，B，C三个数，输出其中最大的数。 第十六课时 1、 IF语句的复习。 2、 练习：（1）指出下列语句中的错误，并加以改正。 （1） IF X0 THEN X=X+1 ELSE X=X-1 （2） IF Y=Y$ THEN LET E=E2 ELSE LET E=E*E*E （3）IF S=0 THEN LET X=0 ELSE IF A=5 THEN Y=2*X+1 ELSE Y=2*X=1 PRINT “Y=”：Y END 2READ A，B IF AB THEN LET MAX=A LET MIN=B ELSE LET MAX=B LET MIN=A END IF PRINT MAX，MIN DATA 8，10 END 3、 某运输部门为旅客托行李，从甲站到乙站其收标准为：20公斤（包括20公斤）以内，每公斤收托运费1。5元；如果超过20公斤，则超过部分每公斤加 0。8元，请你为部门设计一个符合以上规定的收费程序。 第十七课时 1、 嵌套IF语句的一般格式及语句的含义。 2、 举例：用IF-THEN-ELSE语句实现符号函数：SGN（X） 程序如下： INPUT X IF X=0 THEN LET S=0 ELSE IF X20 THEN P=20*0.13+（W-20）*0.22 ELSE P=W*0.13 END IF PRINT “P=”：P END 输入：（1）12 （2）36 （2） A=3: B=A:C=4 IF A=A THEN PRINT C END 运行结果：3 3 4 （3）X=3: Y=1: Z=11 IF ZY THEN SWAP Y, Z IF ZX THEN SWAP X, Z IF YX THEN SWAP X,Y PRINT X, Y, Z END 11,3,1 (4) INPU “A,B,C”;A,B,C IF BA THEN D=A:A=B:B=D END IF IF BC THEN PRINT A; “”;B; “”;C ELSE IF CA THEN PRINT C; “”;A; “”;B END IF PRINT A; “”;C; “”;B END IF END 输入：33，66，13 输出：133366 第十九课时 1、 多路选择结构（SELECT CASE语句）的介绍。 SELECT CASE 语句的一般格式： SELECT CASE CASE CASE . . . CASE CASE ELSE END SELECT 2、 是数值表达式或字符串表达式。是由一组情况构成的，情况之间用逗号分隔。三种情况说明。 3、 五点注意。P130 4、 举例：讲解书上例题（P130） 5、编写一个计税程序。 假定计税有如下规定： （1） 货价=2000元，免税。 （2） 2000元货价=5000元，按2%纳税。 （3） 货价5000元，5000元以内部分按2%纳税，超出部分按5%纳税。 程序如下： REM 计税程序 INPUT “货价？”；HUO SELECT CASE HUO CASE IS=2000 LET tax=0 CASE 2000.10 TO 5000 LET tax=HUO*0.02 CASE ELSE LET tax=5000*0.02+(HUO-5000)*0.05 END SELECT PRINT “货价 =”；HUUO， “税=”；tax END 程序运行结果如下： RUN 货价？6865 货价=6865 税=193.25 第二十课时 练习：1、指出下列语句中的错误，并加以改正。 （1）SELECT CASE X=2*A-3*B CASE 4 OR 5 PRINT X=4 OR X=5 CASE 12 TO 15 PRINT “X=12”TO “X=15” CASE ELSE PRINT OUT OF RSNGE （2）SELECT CASE X CASE =80 PRINT PASS CASE =75 PRINT GOOD CASE =90 PRINT VERY GOOD CASE ELSE PRINT POOR （3）SELECT CASE S=A*B+C*D CASE S=-5 OR 5 PRINT A CASE S=6 TO 6 PRINT B CASE S=”-6”TO-10 PRINT C ELSE CASE 3、 编程：用SELECT CASE 语句实现 某运输部门为旅客托行李，从甲站到乙站其收标准为：20公斤（包括20公斤）以内，每公斤收托运费1.5元；雨果超过20公斤，则超过部分每公斤加 0.8元，请你为部门设计一个符合以上规定的收费程序。 4、作业：学期结束，给出学习优良 的条件如下： 1 所考5门功课的成绩总分超过44450分； 2 每门功课成绩都在88分以上； 3 前3门功课（语、数、外 ）的成绩都在95分以上，其他两门在80分以上。 用A1，A2，A3，A4，A5分别表示5门功课，请输入某学生的5门功课成绩，判断该生是否获学习优良奖。 第二十一课时 1、 由一个实例看循环。 FOR K=1 TO 10 SETP 2 PRINT K NEXT K 2、 计数型循环的一般格式和功能。 一般格式： FOR 循环变量=初值 TO 终值 SETP 步长值 循环体 NEXT 循环变量 各部分含义：P136 3、 执行过程。 S=0 FOR K=1 TO 10 S=S+K NEXT K PRINT S,K END 4、练习：指出下面各程序段中的错误。 （1）FOR l TO 20 PRINT T NEXT T (2)FOR N=l TO 100 LET S=S+N PRINT “S=” ; S END (3)FOR C=5 TO l PRINT C, NEXT C 第二十二课时 1、循环的次数一般说来，循环的次数由初值，终值和步长三个因素来决定： 循环次数=INT（终值初值）/步长+1） 例如，单初值为1、终值为10、步长为2时，循环的次数应为INT（101）/2+1）=5 次。 2、 写出下面程序的执行次数： （1） FOR j=15 TO 100 PRINT j； NEXT j END （2）FOR H=1 TO 10 LET J=J+2 PRINT J， NEXT J END 运行结果：3 6 9 12 3、 写运行结果： (1) FOR I=2 TO 25 STEP 3 PRINT I+1; NEXT I (2) FOR j=1 TO 5 K=j*j ： PRINT j , k Next j END 4、 试编写一个程序，计算1+3+5+97+99 第二十三课时 1计数型循环的应用. 设计循环结构时，第一步，要弄清循环体的内容，既哪些内容是被重复执行的；第二步，要确定循环次数，如果能够先确定循环次数，就用记数型循环结构，否则就用后面将要学习的结构：第三步，把循环体中的具体步骤转化为程序段。 2、例1、计算1+2+3+100的值。 4、 P139例2 假设DATA语句中存放了某班30名学生数学考试成绩，试编程计算该班数学考试平均分。 5、FOR