《程序流程图-循环结构》由会员分享，可在线阅读，更多相关《程序流程图-循环结构（27页珍藏版）》请在金锄头文库上搜索。
1、第三章 程序设计基础,流程控制（顺序，选择，循环结构） 常用函数（asc,%,int,at） 国考笔试题,本 节 要 点,条件,A,B,A,B,条件,A,T,F,T,F,选择（分支）结构,循环结构,顺序结构,条件,A,B,T,F,选择（分支）结构,if 条件A elseB endif,判断X是否为数字,输出09,T,F,读取字符x,开始,结束,判断读入字符为数字 则输出所有数字,accept to xif x是数字字符输出所有数字字符 endif,if asc(x)在asc(0)和asc(9)之间输出所有数字字符 endif,if asc(x)=asc(0) and asc(x)=asc(0)
2、 and asc(x)= asc(9) for i = asc(0) to asc(9)?chr(i)endfor endif,“e:yh-vfoyh2010程序程序1.prg“,s=0+1=s+1=1s=1+2=s+2=3s=3+3=s+3=6s=6+4=s+4=10,计算1+2+3+100,s=0 For i=1 to 100s=s+i Endfor ?” s=”,s,设为i,累加器：s=0,计算1+2+3+100,初始化S,计算S=1+2+3+x,开始,输出S,结束,S=0,开始,输出S,结束,i=100,S=S+i,T,F,判断i=终值,语句序列A i=i+步长,T,F,FOR 变量=
3、初值 TO 终值 STEP 步长语句序列A ENDFOR | NEXT变量,只要变量的值小于等于终值，重复执行循环体中的语句序列。,给变量i赋初值,循环结束,FOR 循环,一般知道终值 用for循环,默认为1 可以不写,i=100,如果i为奇数， SSi； 否则，SSi,T,F,初始化S,开始,结束,计算1234100,S=0for i =1 to 100if i为奇数SSi elseSSi endif endfor,If i%20,注：判断一个整数M能否被另一个整数N整除，一般采用3种方法： 判断MOD(M,N)是否等于0 INT(M/N)是否等于M/N M%N是否等于0，若等于，则表明M能
4、被N整除。,i=10,SS*i,T,F,初始化S,开始,结束,计算 10!,S=1for i =1 to 10SS*i endfor,i=1 Do While i=10s=s*i i=i+1 enddo,累乘器s 初始值置为1,如果在命令窗口输入并执行命令： “LIST 名称”后在主窗口中显示： 记录号 名称1 电视机2 计算机3 电话线4 电冰箱5 电线 假定名称字段为字符型、宽度为6， 那么下面程序段的输出结果是,e:yh-vfoyh2010程序2005-9-笔试.prg,国贸6,GO 2 SCAN NEXT 4 FOR LEFT(名称,2）=“电“IF RIGHT(名称,2）=“线“LO
5、OPENDIF? 名称 ENDSCANA）电话线 B）电冰箱 C）电冰箱电线 D）电视机电冰箱,1 电视机2 计算机3 电话线4 电冰箱5 电线,e:yh-vfoyh2010程序2005-9-笔试.prg,Scan循环 P68,GO 2 SCAN NEXT 4 FOR LEFT(名称, 2) = “电“IF RIGHT(名称, 2) = “线“EXITENDIF ENDSCAN ? 名称,1 电视机2 计算机3 电话线4 电冰箱5 电线,输出结果：电话线,e:yh-vfoyh2010程序2006-9-笔试.prg,如下程序显示的结果是【8】。s=1i=0do while i=1two=two+
6、SUBSTR(one,i,1)i=i-1 ENDDO?two,KROW,A=4,TWO=“K”,e:yh-vfoyh2010程序2007-4-笔试.prg,营销1,下面程序计算一个整数的各位数字之和。在下划线处应填写的语句是 SET TALK OFF INPUT “x=“ TO x s=0 DO WHILE x!=0s=s+MOD(x,10）_ ENDDO ? s SET TALK ONA)x=int(x/10) B)x=int(x%10) C)x=x-int(x/10) D)x=x-int(x%10),e:yh-vfoyh2010程序2007-9-笔试.prg“,x=int(x/10),SE
7、T EXACT ON s=“ni“+space(2) IF s=“ni“IF s=“ni“?“one“ELSE?“two“ENDIF ELSEIF s=“ni“?“three“ELSE?“four“ENDIF ENDIF RETURN,A) one B) two C)three D)four,下列程序的运行结果是,e:yh-vfoyh2010程序2008-4-笔试.prg,下列程序段执行以后，内存变量y的值是CLEAR x=12345 y=0 DO WHLIE x0 y=y+x%10 x=int(x/10) ENDDO ?yA) 54321 B)12345 C) 51 D)15,下列程序段执行
8、后，内存变量s1的值是s1=”network” s1=stuff(s1,4,4,”BIOS”) ?s1A) network B) netBIOS C)net D) BIOS,e:yh-vfoyh2010程序2008-4-笔试-28.prg,练习2：任意给定一个年份，判断该年是否为闰年。闰年的条件是：能被4整除但不能被100整除； 或者能被100和400整除的数就是闰年。clear input “请输入日期：“ to aif (int(a/4)=a/4 and int(a/100)a/100) or ；(int(a/100)=a/100 and int(a/400)=a/400)?a,“年是闰年
9、“else ?a,“年不是闰年“endif return,提示：判断一个整数M能否被另一个整数N整除，一般采用3种 方法，即：判断MOD(M,N)是否等于0或INT(M/N)是否等 于M/N或M%N是否等于0，若等于，则表明M能被N整除。,例：编写一名为“查找1”的程序，从student表中查 找姓名为“王五”的学生信息。,clear use student locate for 姓名=“王五“ if found()display else?“查无此人“ endif use Return,e:yh-vfoyh2010程序if-查找.prg,select * from student where
10、 姓名=“李一“,82套 综合应用,1.建立一个文件名和表单名均为oneform的表单，表单中一个页框Pageframe1和两个命令按钮Command1(生成)和Command2(退出)，Pageframe1中有两个页面(Page1和Page2)，标题分别为为“系名“和“计算方法“，Page1中有一个组合框(Combo1),Page2中有一个选项组(Optiongroup1),选项组(Optiongroup1)中有两个选项按钮，标题分别为“平均工资“和“总工资“如图所示。 2. 将“学院表“添加到表单的数据环境中，然后手工设置组合框(Combo1)的RowSourceType属性为6、RowS
11、ource属性为“学院表.系名“，使得程序开始运行时，组合框中有可供选择的来源于“学院表“的所有“系名“。,3.为“生成“命令按钮编写程序。程序的功能是：表单运行时，根据选项组和组合框中选定的“系名“和“计算方法“，将相应“系“的“平均工资“或“总工资“存入自由表salary.dbf中，表中包括“系名“、“系号“以及“平均工资“或“总工资“三个字段。 4.为“退出“命令按钮编写程序。程序的功能是：释放表单。 5.运行表单，在选项组中选择“总工资“，在组合框中选择“通信“，单击“生成“命令按钮进行计算。最后，单击“退出“命令按钮结束。,e:yh-vfoyh2010列表框.scx,习题：1、编写名
12、为“打开表”的程序文件，程序功能为：打 开student表，并在浏览窗口中显示。 2、编写名为“替换”的程序文件，程序功能为:打开 student表，将所有会计系的学生的入学成绩增加 10分。 3、编写名为“转换”的程序文件，程序的功能为：将 输入的大写英文字母转换称小写字母。 4、编写名为“倒序输出”的程序文件，程序的功能为： 将输入的三位数倒序输出。,习题: 1、编写一个名为“判断”的程序，功能为:判断 输入的数是什么类型，如果是“奇数”，则 输出“是奇数！”，否则输出“是偶数！” 2、编写一个名为“选择”的程序，功能为:根据 输入的x的值，选择不同的表达式，计算并 输出相应的y。Y= x+2 （x=0）x*2 (x0)3、输入3个整数，输出其中最大的数。 4、判断输入字符类型。输入一个字符后，判断后 通过信息提示框输出字符的类型。,
