信息学竞赛辅导初赛之完善程序.pptVIP

变量方面的填空（定义类型、设定初值、变量赋值等） 循环方面的填空（定义变量、设定循环的初值和终值、在循环中如何引用） 分支转移方面的填空（定义布尔表达式、确定程序的走向） 主程序和子程序关系方面的填空（值参、变参、调用格式） 输入输出方面的填空 不含子程序 例一、求元素之和最大的子方阵：在m*n的正整数数字方阵中，找出一个p*q的子阵，使得其元素之和最大。 3 8 4 22 11 1 7 9 5 21 6 2 10 3 8 9 2 7 12 3 5 21 6 10 3 8 2 7 12 程序清单 Var a:array[1..20,1..20] of integer; m,n,p,q,i,j,max,p1,q1,s,i1,j1:integer; Begin for i:=1 to 20 do for j:=1 to 20 do a[i,j]:=0; readln(m,n); for i:=1 to m do begin for j:=1 to n do read(a[i,j]);readln end; readln(p,q); max:=0; 程序清单（续） For i:=1 to m-p+1 do for j:=1 to n-q+1do begi