по шагам выполнения цикла Опции

[asu2006]

Может ли кто расписать изменение переменых s и i по шагам выполнения цикла

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

2) s:=0; i:=0
while i>1 do
s:=s+1/i;
i:=i-1;