
程序设计初级顺序分支循环.pptx
18页第三章 PASCAL语言基础知识,江北区实验小学程序设计初级,顺序结构程序的一般过程:,1.获取数据,2. 计 算,3.输出结果,var a,b,s:integer;begin readln(a,b); s:=a*b; writeln('s=',s);end.,顺序结构程序的一般过程:,1.获取数据,2. 计 算,3.输出结果,练习:读取两个数,把两个数交换后输出顺序结构程序的一般过程:,1.获取数据,2.计 算,3.输出结果,练习:输入一个三位自然数,把这个数的百位与个位数对调,输出对调后的自然数函数,trunc( ),x,函数名,变量名,;,判断条件,True,,,False,语句2,,,语句1,,,,,选择结构,选择结构,If 条件 then 语句1 else 语句2 ;,True,False,选择结构,注:①有两种形式:一是当布尔表达式的值位T或F时都分别执行不同的语句二是省略F分支 ②布尔表达式的值应属布尔类型即只有真或假两种可能 ③THEN后的语句在与ELSE之间不能加“;”。
④语句可以是简单语句,也可以为复合语句选择结构,If 条件 then 语句1 else 语句2 ;,选择结构,,草稿,选择结构,多路判断注意点:,①表达式再长,条件再多,最终只产生一个结果,要么是true 要么是 false ②表达式中的每个判断条件都需要加括号 ③注意计算的优先级,and 高于 orP70,If 表达式 then 语句1 else 语句2 ;,循环结构初体验,var a,b,c,d,t:lognint;begin readln(a,b,c,d,); t:=a+b+c+d; writeln(‘2001001 ’,t); readln(a,b,c,d,); t:=a+b+c+d; writeln(‘2001002 ’,t); readln(a,b,c,d,); t:=a+b+c+d; writeln(‘2001003 ’,t); readln(a,b,c,d,); t:=a+b+c+d; writeln(‘2001004 ’,t);end.,,,,,,var a,b,c,d,t,k:lognint;begin for i:=1 to 4 do begin readln(a,b,c,d,k); t:=a+b+c+d; writeln(k,’ ’,t); end;end.,,循环结构,for := to do ;,for i:= 初值 to 终值 do 语句;,,,for i:= 1 to n do 语句;,循环结构,for i:= 1 to n do 语句;,题1,*,writeln(*),题2,12345,*,*,*,*,writeln(i),……,……,n,n,题3,246810,writeln(2*i),……,?,找规律,题4,13579,writeln(2*i-1),……,?,题1,机械重复,从题2开始,有变化的重复,而2-4题输出的变化只与i的值相关。
有的题目还与其他变量相关,如:n 题5,nn-1n-2,writeln(n-i+1),……,321,循环结构,①先将初值赋给左边的变量(称为循环控制变量); ②判断循环控制变量的值是否已"超过"终值,如已超过,则跳到步骤⑥; ③如果末超过终值,则执行do后面的那个语句(称为循环体); ④循环变量递增(对to)或递减(对downto)1; ⑤返回步骤②; ⑥循环结束,执行for循环下面的一个语句For语句执行过程,for i:= 1 to n do 语句;,循环结构,①循环控制变量必须是顺序类型例如,可以是整型、字符型等,但不能为实型 ②循环控制变量的值递增或递减的规律是:选用to则为递增;选用downto则递减 ③所谓循环控制变量的值"超过"终值,对递增型循环,"超过"指大于,对递减型循环,"超过"指小于 ④循环体可以是一个基本语句,也可以是一个复合语句 ⑤循环控制变量的初值和终值一经确定,循环次数就确定了但是在循环体内对循环变量的值进行修改,常常会使得循环提前结束或进入死环建议不要在循环体中随意修改控制变量的值 ⑥for语句中的初值、终值都可以是顺序类型的常量、变量、表达式。
For语句说明,for i:= 1 to n do 语句;,函数,trunc( ),x,第三章 PASCAL语言基础知识,。












