а не i <= r ?