Определите значение переменной s после выполнения следующего фрагмента программы:
s:=0; i:=7;
while i > 1 do begin
s:= s + i div 2;
i:= i - 1;
end;