Функция Flush вызывается в конце выполнения  каждой  функции
        Rеаd, Write, Rеаdln или Writeln. Она может также сбрасывать буфер
        текстового файла.

             Если в поле Моdе находится fmInput,  функция Flush для того,
        чтобы отбросить оставшиеся (несчитанные) символы в буфере,  может
        записать 0 в BufPos и BufEnd. Это средство используется редко.

             Если в поле Моdе находится fnOutput,  то функция Flush может
        записать  содержимое  буфера,  в  точности таким же образом,  как
        функция InOut. Этим обеспечивается,  что выведенный на устройство
        текст  появится  на устройстве немедленно.  Если функция Flush не
        выполняет никаких действий, текст не будет выведен на устройство,
        пока буфер не станет полным, или файл не будет закрыт.