Дан фрагмент программы.Что появится на экране?
var
S:=0;
for i:=1 to 4 do
begin
A[i]:=i^2-1
S:=s+A[i];
End;
writeln(s);

0

0