Визначте s після виконання операторів:
x:=3; s:=4;
for i: 2 to 4 do begin s:=x+2; s:= s+x end;