Чому буде дорівнювати значення змінної s?
var i, s: integer;
begin
s := 0;
for i: = 1 to 3 do
begin
s := s + i;
end;
end;