Определите значение переменной S после выполнения следующих операторов:

S:=0; i:=0; while i<5 do i:=i+1; S:=S+1/i;