определите значение переменной после выполнения фрагмента плииизз
1) s:=0
i:=0
while i<5 do i:=i+1
s:=s+i
2) s:=0
i:=2
while i>1 do
begin
s:=s+1/i
i:=i-1