Конференция "FreePascal" » Странная вещь, или даже глюк... [Win32, Dos]
 
  • VEG © (14.04.04 16:22) [0]
    Как-то на одной из олимпиадок обнаружил странный глюк. После связывания с input/output файла, и дальнейшего их закрытия, вывод на экран не восстанавливается:

     Assign(input, INPUT_FILE_NAME); Reset(input);
     Assign(output, OUTPUT_FILE_NAME); Reset(input);
     Close(input);
     Close(output);
     WriteLn('test');

  • PVOzerski © (14.04.04 16:49) [1]
    Даже если исправить 2-ю строчку примера на Assign(OUTPUT_FILE_NAME, '2'); Rewrite(output); работать не должно. Ты же закрыл файл output! И в Паскалях от Борланда тоже работать не будет.
    Изволь перед WriteLn('test') вставить assign(output,'');rewrite(output); и счастье будет.
  • VEG © (26.04.04 22:29) [2]
    Понятно. Извиняюсь, просто никогда не сталкивался:)
 
Конференция "FreePascal" » Странная вещь, или даже глюк... [Win32, Dos]
Есть новые Нет новых   [134430   +2][b:0][p:0]