Цитата:
Сообщение от Vladimir_S
Полную отладку, если потребуется, сделаю завтра, а пока попробуйте начать с исправления явных ошибок:
1. Readln из второй снизу строки поставьте ПЕРЕД until (n=4);
2. halt(1), Begin, который в третьей снизу строке, и end;, который в четвертой снизу строке, уберите СОВСЕМ.
|
Здесь был выложен код уже с добавлением дополнительных begin и end без которых программа не компилируется,а выдаёт Встречено '.', а ожидалось ';'. Ваши исправления внесла,но ошибка осталась.