《计算机公共基础第11章课件》由会员分享，可在线阅读，更多相关《计算机公共基础第11章课件（42页珍藏版）》请在金锄头文库上搜索。
1、第第11章章 QBASIC的程序结构的程序结构学习目标 u掌握各种数据输入语句u掌握输出语句和TAB()函数的应用u掌握逻辑运算符和关系运算符的应用u掌握条件语句和多分支语句的使用u掌握循环语句的使用1第1页，共42页。第第11章章 QBASIC的程序结构的程序结构教学内容 11.1 顺序结构 11.2 选择结构 11.3 循环结构 本章小结返回总目录2第2页，共42页。11.1 顺序结构顺序结构 赋值语句赋值语句 格式：LET=语句定义符LET可省略“=”被称为赋值号，与等号的概念不同 举例：B=10*A+1将表达式赋给变量 说明：赋值号的左侧只能是一个变量允许 I=1:I=I+1避免溢出(
2、Overflow)错误 例如，将32768赋给一个整型变量返回目录3第3页，共42页。11.1 顺序结构顺序结构 数据输出语句数据输出语句 格式：PRINT 输出项列表输出项列表;|,分号为紧凑格式逗号为标准格式：屏幕上的每一行被分为5个标准输出区，每个输出区可显示14个字符 例：PRINT 1,2,3,4,5,6,7PRINT 北京,上海,PRINT“A”,”B”;”C”输出为：1234567北京上海ABC打印项后有逗号或分号，下一条PRINT语句的打印项将在同一行输出。返回目录4第4页，共42页。11.1 顺序结构顺序结构 数据输出语句数据输出语句 TAB()函数uTAB(n)：将打印项送
3、到当前行的第n列上文本模式下，屏幕一行有80列，可显示80个字符uTAB()函数必须与PRINT语句、分号一起使用例如，PRINT TAB(10);123;TAB(30);ABC;CLS语句u作用：清除输出窗口中的所有信息 （不会清除源程序）u格式：CLS 返回目录5第5页，共42页。11.1 顺序结构顺序结构 数据输入语句数据输入语句 1.键盘输入语句INPUTINPUT;输入提示输入提示;|,在程序运行过程中输入数据，数据不保存在程序中 例：DIM D1%,D2%,Total%INPUT Please input data1:,D1%INPUT Please input data2:,D2
4、%Total%=D1%+D2%PRINT Data1+Data2=;Total%END执行程序：Please input data1:20Please input data2:40Data1+Data2=60返回目录6第6页，共42页。11.1 顺序结构顺序结构 数据输入语句数据输入语句 例：键盘输入水果名称、单价和重量，输出水果名称和应付钱款DIM Item AS STRING*12DIM Weight AS INTEGERDIM Price AS SINGLEINPUT“Input item:,ItemINPUT“Input price:,PriceINPUT“Input weight:,
5、WeightPRINT Item:;ItemPRINT Money:;Weight*PriceEND执行程序：Input item:water melonInput price:1.86Input weight:10Item:water melonMoney:18.6返回目录7第7页，共42页。11.1 顺序结构顺序结构 数据输入语句数据输入语句 2.READ/DATA READ为读数语句：READ DATA为置数语句：DATA 例：DIM A%,B%,C%,D%定义4个整型变量DIM Average!READ A%,B%,C%,D%Average!=(A%+B%+C%+D%)/4PRINT
6、Average=;Average!DATA 10DATA-20,30,-50END返回目录8第8页，共42页。11.1 顺序结构顺序结构 数据输入语句数据输入语句 有关 READ/DATA的说明 READ/DATA语句必须同时出现在程序中DATA语句可放置在程序的任意处 DATA语句提供的数据总数要=READ语句中的变量总数，否则将出现“Out of Data”错误DATA后面只能出现常量，且类型必须与READ中变量的类型相对应分析错误：READ Person$,Age,Salay,BillDATA 23,Peter,1234.56+100数据类型不一致DATA中出现了表达式数据个数比变量个数
7、少1返回目录9第9页，共42页。11.1 顺序结构顺序结构 数据输入语句数据输入语句 例：用READ/DATA语句重写水果销售程序 DIM Item AS STRING*12 DIM Weight AS INTEGER,Price AS SINGLE READ Item,Weight,Price PRINT Item:;Item PRINT Money:;Weight*Price DATA Apple,12,1.2 ENDDIM Item AS STRING*12DIM Weight AS INTEGERDIM Price AS SINGLEINPUT“Input item:,ItemINPU
8、T“Input price:,PriceINPUT“Input weight:,WeightPRINT Item:;ItemPRINT Money:;Weight*PriceEND返回目录10第10页，共42页。11.1 顺序结构顺序结构 数据输入语句数据输入语句 3.RESTORE语句 u作用：恢复数据区，让数据指针重新指向第一个DATA语句中的第一个数据。u格式：RESTORE例：DIM A%,B%,C%,D%,E%READ A%,B%,C%RESTOREREAD C%,D%,E%PRINT A%;B%;C%;D%;E%DATA 10,20,30运行结果为：10 20 10 20 30返回
9、目录11第11页，共42页。11.2 选择结构选择结构为何需要“选择结构”？u在实际工作中，往往要根据当时的情况决定下一步操作是什么 例如，要对学生成绩作评价：如果成绩达到或超过60，则输出PassuQB使用IFTHENELSE语句实现选择结构u选择结构又称分支结构 返回目录12第12页，共42页。11.2 选择结构选择结构 关系关系/逻辑表达式逻辑表达式1.关系运算符和关系表达式关系表达式：包含有关系运算符的表达式QB用-1表示成立(真)，0或非-1值表示不成立(假)关系运算符含义数学符号举例=等于=9=9 成立，A=B 不成立大于98 成立，35 不成立=大于或等于8=6 成立，8=8成立
10、小于910成立，98不成立=小于或等于9=9成立，“B”=“A”不成立不等于67成立，“C“C不成立返回目录13第13页，共42页。11.2 选择结构选择结构 关系关系/逻辑表达式逻辑表达式2.逻辑运算符和逻辑表达式运算符操作数A操作数B运算结果AND成立成立成立成立不成立不成立不成立成立不成立不成立不成立不成立OR成立成立成立成立不成立成立不成立成立成立不成立不成立不成立NOT成立不成立不成立成立逻辑表达式：含有逻辑运算符的表达式返回目录14第14页，共42页。11.2 选择结构选择结构 关系关系/逻辑表达式逻辑表达式u逻辑运算符的优先顺序从高到低是：NOTANDOR例如，设A=10，B=2
11、0，C=30，则：返回目录A1 AND B10 AND C=30成立A5 AND B=A+2 AND C=A-1不成立NOT(A20 OR B10)成立(A10)AND CA+B不成立A10 AND CA+B成立15第15页，共42页。11.2 选择结构选择结构 关系关系/逻辑表达式逻辑表达式u运算符的优先顺序从高到低依次为：算术运算关系运算逻辑运算赋值运算例，设 A=3，B=4，求 X=2+NOT(A=B AND B2*5第一步：X=2+NOT(0)OR A=B AND B10第二步：X=2+(-1)OR 0 AND(-1)第三步：X=1 OR 0第四步：X=-1返回目录16第16页，共42
12、页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 1.行条件语句（写在一行）IF THEN ELSE 例：输入两个正整数，输出最大值 DIM A AS INTEGER,B AS INTEGER DIM Max AS INTEGER INPUT A,B=,A,B IF A B THEN Max=A IF A B THEN Max=A ELSE Max=B或IF B A THEN Max=B ELSE Max=A或IF A-B0 THEN Max=A ELSE Max=B17第17页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 例1：输入两个正整
13、数A、B，按从大到小的顺序输出。DIM A AS INTEGER,B AS INTEGERDIM Temp AS INTEGERINPUT A,B=,A,BIF AB THEN PRINT A;B ELSE PRINT B;AEND返回目录交换两个变量值需中间变量18第18页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 例2：降序输出3个数据DIM A%,B%,C%,T%INPUT Enter three Data:,A%,B%,C%PRINT Before Sorting:;A%;B%;C%IF A%B%THEN T%=A%:A%=B%:B%=T%IF A%C
14、%THEN T%=A%:A%=C%:C%=T%IF B%C%THEN T%=B%:B%=C%:C%=T%PRINT After Sorting:;A%;B%;C%END分析：经A与B、A与C的两次比较找出最高分保存在A中 再经B与C的比较找出第二高分保存在B中返回目录19第19页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 2.块条件语句IF THENELSEEND IF 如果条件表达式不成立时无需操作，可省略ELSE子句。返回目录20第20页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 例：市内电话计费程序 3分钟以内按0.2元
15、收费，超出部分按0.1元/分钟 DIM Time AS INTEGER,Bill AS SINGLE INPUT Time:,Time IF Time=3 THEN Bill=0.2 ELSE Bill=0.2+(Time-3)*0.1 END IF PRINT Time=;Time,Bill=;Bill END返回目录同一行上THEN后不能有任何语句(注释除外)21第21页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 3.块条件语句的嵌套形式IF THENELSEIF THENELSEIF THENELSE END IF返回目录22第22页，共42页。11.2
16、 选择结构选择结构 条件语句和分支语句条件语句和分支语句 例：评价学生成绩DIM X AS INTEGER,Grade AS STRINGINPUT Data:,XIF X=90 THEN Grade=ExcellentELSEIF X=80 THEN Grade=GoodELSEIF X=70 THEN Grade=MiddlingELSEIF X=60 THEN Grade=PassedELSE Grade=FailEND IFPRINT Data=;X,Grade=;GradeEND返回目录90100：Excellent8089：Good7079：Middling6069：Passed60分以下Fail 23第23页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 4.多分支选择结构SELECT CASE CASE CASE CASE CASE ELSEEND SELECT返回目录24第24页，共42页。11.2 选择结构选择结构 条件语句和分支语句条件语句和分支语句 例：用SELECT-CASE语句评价学生成绩返回目录DIM X AS INTEGER
