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

В итоге будет выведено "sr=13"

Ничего не будет напечатано, так как в программе кроме большого количества опечаток есть и явная ошибка: переменная sr не может иметь тип integer (это следует из оператора sr:=s/3).