2013信息奥赛第二十八次课（回顾）.pptVIP

回顾与拓展 输入4名学生数学、物理、英语、物理、化学五门课的考试成绩，求出每名学生的总分，打印出表格。 方阵填数 在一个N×N的方阵中，填入1,2,…,N×N个数，并要求构成如下的格式：N＝4　 * * 本节课任务： 1.复习语句 （读、写、分支、循环。数据类型：数组） 希望通过这节课大家能还清旧账 ，主要是通过教师演示来理解各种用法，完成拉丁方阵。 2.拓展做题 拓展做题： 题目是上节课的方阵（拉丁、方格填数，常州网） 把本节课做的题目发给我，以自己名字命名。 /wxqgr/xxas/as1/yyew/Index.html 1.read语句:是读入已知到变量中去，不必纠结与有ln与无ln，你可以全用无ln的形式read(x,y)。 2.write语句:是输出打印项 （可以是变量、常量、表达式） 3.赋值语句:把赋值好右边的值给左边的变量。x:=*** 4.if 条件成立 then 语句 else 语句 5. for 循环:用循环变量记录变化，变化范围从起点到终点，每变化一次，循环体执行一次。 write(‘*’); for j:=1 to 5 do writeln; for i:=1 to 4 do begin end; 这个过程循环变量是如何改变的呢？ 百闻不如一见！ 注意同时学习调试技巧 常用快捷键 f9编译 ctrl +f9 运行 alt+f5看结果 调试快捷键 f2 保存 ctrl+f2停止调试 ctrl+f8 设置断点，再按一次取消 f7 调试 在输入变量窗口可以调出上一次运行输入的变量 ctrl+f7设置观察变量 一维数组 a:array[1..5] of integer; a[1] a[2] a[3] a[4] a[5] read(a[i]); for i:=1 to 5 do 二维数组 a:array[1..3,1..5] of integer; a[1,1] a[1,2] a[1,3] a[1,4] a[1,5] a[2,1] a[2,2] a[2,3] a[2,4] a[2,5] a[3,1] a[3,2] a[3,3] a[3,4] a[3,5] 有两个下标，分析变化特点 二维数组 a[1,1] a[1,2] a[1,3] a[1,4] a[1,5] a[2,1] a[2,2] a[2,3] a[2,4] a[2,5] a[3,1] a[3,2] a[3,3] a[3,4] a[3,5] read(a[i,j]); for i:=1 to 3 do for j:=1 to 5 do 4 6 8 9 1 2 8 5 6 7 0 5 9 4 5 7 8 1 拉丁方阵题目描述： 4 1 2 3 4 2 3 4 1 3 4 1 2 4 1 2 3 最近的例题 题50：输出杨辉三角的前N行(N10)。---二维数组 Input 输入只有一行，包括1个整数N。(N10) Output 输出只有N行. Sample Input 5 Sample Output 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 杨辉三角 读已知 数组设置初值 推导---数组相关位置元素的值 输出 var a:array[1..10,1..10] of integer; i,j,n:integer; begin readln(n); for i:=1 to n do for j:=1 to n do a[i,j]:=0; a[1,1]:=1; for i:=2 to n do for j:=1 to i do if (j=1) or (i=j) then a[i,j]:=1 else a[i,j]:=a[i-1,j]+a[i-1,j-1]; for i:=1 to n do begin for j:=1 to i do if i=j then write(a[i,j]) else write(a[i,j],’ ‘);{每行后面不能有空格} writeln; end; end. 0 1 0 0 0 0 0 1 1 0 0 0 0 1 2 1 0 0 0 1 3 3 1 0 0 1 4 6 4 1 通式 0 1 0 0 0 0 0 1 1 0 0 0 0 1 2 1 0 0 0 1 3 3 1 0 0 1 4 6 4 1 通式 var a:array[1..10,0..10]