Nie dam głowy ale repeat nie ma bloku begin … end (no przynajmniej tak jest w Delphi). Pętla repeat kończy się (w sensie składni) w momencie słowa kluczowego until, zatem pewno tutaj tkwi problem. Popraw na coś takiego:
Zamiast się prześcigać w zgadywaniu, zgodziłbym się z pierwszym komentarzem aleksa - pisanie “znajdźcie mi błąd” kiedy kompilator wyraźnie informuje w czym problem, jest marnowaniem czasu próbujących pomoc. Jaki jest ten błąd i dlaczego treść komunikatu błędu nie pozwoliła Blademu na naprawienie błędu?
Komunikaty błędu mają to do siebie, że należy patrzeć także na linię przed i po sugerowanej jako błędna. Poza tym napisz proszę co *dokładnie* wypluł kompilator.
Jak można zawieszający się program nazwać “błędem kompilacji”? Nie, kompilator nie popełnił żadnego błędu. Ty pisząc kod popełniłeś błąd. Dlaczego nie zacząłeś od tego?