Определите значение переменной S после выполнения фрагмента программы.
s:=0
i:=0
while i<5 do
begin
i:=i+1;
s:=s+i
end;