pascal阅读程序练习题1

4． program exp1 (imput,output);var i,s,max:integer;a:array [1..10] of integer;beginfor i:=1 to 10 do