Срочно

Срочно срочно

Срочно

Срочно

program z1;

var s,i:integer;

begin

s:=1;

for i:=2 to 4 do

begin

s:=s+i-1;

end;

writeln('S = ',s);

end.

1) s = 2

2)s = 4

3)s = 7

Ответ: 7.