ReadLn после "assign" и "close", Что с ним? :) Опции

[ApTeMoHnv]

При использовании в своём коде ReadLn'а (удивительно, да? ), он работает, как нужно (неожиданно.. ). Как только я вписал кодик для того, чтобы создавался файл (либо вынимались данные из уже созданного), естественно со всеми assign, rewrite/reset, close, как положено, то обычная функция ReadLn (даже без дополнительных параметров типа readln(f,1)) вообще превращается в нечто для вылетания ошибки. Компиляции проходят успешно, но когда до этого ReadLn'а доходит в самой программе, то выдаёт ошибку 104: File not open for input. Нет, это я конечно понимаю, если бы я вставил этот РидЛн после "ассигна", не написав при этом "реврите/ресет" и не закрыв, то можно было бы согласиться с этой ошибкой. Но по какой причине он ко мне припирается в данном случае? о_0 Тем более ошибка "Файл не открыт для ввода", а функция Readln (прочитать), а не Writeln (записать). Что это за беспредел вообще?
Кстати, если писать просто "Read;", а не "ReadLn;", то всё нормально.. Но я хочу именно ReadLn... =\
Юзаю обычный Turbo Pascal досовский
Спасибо за внимание.

[volvo]

Lapp, а ты что, никогда не завершал программу ReadLn-ом, чтобы не жать на Alt+F5, а сразу посмотреть на результаты? Чего ж тогда тебе

приходится поверить в невозможное

, когда то же самое делает автор?

обычная функция ReadLn (даже без дополнительных параметров

у него вылетает... А вот почему? Что он делал до этого??? Я ничего и никогда не спрашиваю просто так. И совсем не просто так попросил привести

строку Uses, определение файловой переменной

, с которыми работает автор. Ибо код

begin
  assign(input, 'a.txt'); rewrite(input);
  write(input, 'just a test');
  close(input);
  readln;
end.

будет - и должен - вылетать именно по 104 ошибке (под TP7). Меня же интересует не это... Меня больше интересует в данной ситуации не то, почему НЕ отработал ReadLn, а то, почему при этом отработал Read...

[Lapp]

когда то же самое делает автор?

Боюсь, что не то же самое . Речь, как я понял, идет о закрытии файла и попытки писать в него же. И если бы я закрыл input перед ReadLn'ом в конце программы - боюсь, я получил бы ту же ошибку. Нет, это не одно и то же)), отнюдь. И именно это я хотел сказать: не надо закрывать дверь перед тем, как входить.


А это:

обычная функция ReadLn (даже без дополнительных параметров типа readln(f,1)) вообще превращается в нечто для вылетания ошибки

- можно интерпретировать либо так, что автор считает за параметры только единицу, либо (что скорее), что автор все же закрыл input. Это очень вероятно, имя input так и просится для файла.

больше интересует в данной ситуации не то, почему НЕ отработал ReadLn, а то, почему при этом отработал Read...

Этот вопрос я тоже задавал. Ждем разъяснений автора .