pascal循环语句.ppt

《pascal循环语句.ppt》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、循环语句阜阳信息学夏令营pascal初级班知识回顾20mod915mod49div21div8求下列表达式的值：20mod1015mod10149div1045div220mod215mod2知识回顾作业1（请把空行填充完整）Programoushu;vara:integer;Beginreadln(a);ifthen;readln;End.输入一个整数，判断是不是偶数，如果是偶数，则输出偶数输出YFor语句1.递增型FOR循环。FOR循环控制变量:=循环初值TO循环终值DO循环的语句（或语段）例：FORI:=5TO10DOWRITELN(I);如果要重复多个语句，一

2、定要用BEGIN-END形式：例：FORI:=1TO10DOBEGINWRITELN(I);WRITELN(10-I);END;知识回顾For语句2.递减型FOR循环FOR循环控制变量:=循环初值DOWNTO循环终值DO循环语句递减型FOR循环与递增型FOR循环基本相同，只是循环控制变量每次递减。知识回顾3.FOR循环的几点注意内容：(1)循环控制变量必须是顺序类型的变量。所谓顺序类型的变量，就是指整型，字符型，枚举型，子界型，不允许是实型。(2)不允许在循环体内再对循环控制变量赋值。例如：A:=10;B:=50; FORK:=ATOBDO BEGINK:=K+

3、1;{这一句是错误的！！！}WRITELN(K); END;知识回顾4.多重循环循环体由PASCAL语句构成，当然也可以包含FOR语句，这就构成了循环的嵌套，形成多重循环。例如，以下FOR循环输出5行，每行输出10个星号(*) FORi:=1to5DOBEGINFORj:=1TO10DOWrite('*');END;初学者应当特别注意，嵌套的各层循环应当使用不同的变量作为循环变量。知识回顾While语句1.WHILE循环的执行形式：WHILE布尔表达式DO语句    例如：k:=10;    WHILEk>0DOBEGINWriteln(k);     

4、    k:=k-1END;其中(1)WHIlE和DO是PASCAL保留关键字，是WHILE循环语句的组成部分。(2)保留关键字DO后面的“语法”只能是一条语句，称为“循环体”；如果循环体中需要包含多个语句则应该如上例所示，采用一条复合语句。知识回顾Repeat-Until语句1．REPEAT-UNTIL类型的循环的执行形式REPEAT语句1语句2……语句nUNTIL布尔表达式例如：求n=1+2+3+……+100 n:=0;t:=i;REPEATn:=n+t;t:=t+1;UNTILt>100;其中在REPEAT和UNTIL之间的语句构成循环。在它们之间可以有任

5、意多个语句，这一点和FOR，WHILE循环不同，FOR，WHILE循环体在语法上只允许一条语句。知识回顾实例打印出“*”组成以下图形：******programtuxing(input,output);beginwrite(‘******');readln;end.实例打印出“*”组成以下图形：******************programtuxing(input,output);begin     write(‘******************‘);readln;end.实例打印出“*”组成以下图形：******************progra

6、mtuxing(input,output);vari:integer;beginfori:=0to18dowrite(‘*‘);readln;end.实例打印出“*”组成以下图形：******************programtuxing(input,output);vari:integer;begini=0;While(i<=18)beginwrite(‘*‘);i=i+1;end;readln;end.实例打印出10以内的整数，中间用空格隔开：12345678910programnumber(input,output);begin    writ

7、e(‘12345678910‘);readln;end.实例打印出20以内的整数，中间用空格隔开：123……1920programnumber(input,output);vari:integer;beginfori:=1to20dowrite(i,‘‘);readln;end.实例打印出20以内所有偶数，中间用空格隔开：24……1820programoushu(input,output);vari:integer;beginfori:=1to20doifimod2=0thenwrite(i,‘‘);readln;end.练习打印出100以内