y=0;
k=0;
for j=1:10000;
if(y<5)
y=y+(1/j);
k=j-1;
else
y=y;
endif
end
y=y-(1/k);