Что будет напечатано программой?
s:=0;
for i:=1 to 3 do
for j:=1 to 3 do
a[i,j]:=i+j;
for i:=1 to 3 do
for j:=1 to 3 do
s:=s+a[i,j];
writeln(s);