Скопировать текст из файла в файл - Pascal

Формулировка задачи:

Необходимо скопировать из 1 файла в другой не используя строк (String). Там через Char как-то. Буду благодарен

Код к задаче: «Скопировать текст из файла в файл - Pascal»

textual
  repeat
    BlockRead(f, c, SizeOf(c), r);
    BlockWrite(g, c, r, w);
  until r<SizeOf(c);

12   голосов, оценка 3.667 из 5


СОХРАНИТЬ ССЫЛКУ