Запишите файл с изменением порядка байтов - Turbo Pascal

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

Дан нетипизированный файл. Запишите файл с изменением порядка байтов.

Код к задаче: «Запишите файл с изменением порядка байтов - Turbo Pascal»

textual
var a,b : byte;
 f : file;
...
Read(f,a);
Read(f,b);
Seek(f,1);write(f,b);
Seek(f,2);write(f,a);
...

14   голосов, оценка 4.214 из 5


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