Обусловьте, что будет выведено в результате выполнения последующей программы. a) program

Обусловьте, что будет выведено в результате выполнения последующей программы. a) program a7 8;
var i, s: integer,- sr: real;
const a: array [1..6] of integer = 1, 7, 3,
6, 0, 10); begin
s : =0 ;
for i:=l to 6 do s:=s+a[i];
sr:=s/6;
writeln (sr=, sr) end.