Цитата
if (j:=y)

По-моему, тут двоеточие не надо (это же не присваивание). И тело цикла должно же быть как-то ограничено (где начало, где конец).