[icWasya]

А нафига двойной цикл?
1)уберите repeat из 55 строки
2)уберите end из 63 строки
3)и напишите его вместо until в 71 строке