Здравствуйте у меня вот проблема я новичок в программирование. У меня вот такая проблема есть файл file.bin и мне его надо перенести в массив но у меня это не получается, пишу на Turba pascal’e.
C Уважением Антон
var f: File of Byte; { <--- или File of Char, как тебе удобнее }
...
Assign(f, 'file.bin'); Reset(f);
...
Seek(f, 20); { <--- ставим указатель файла на 20-ю позицию (начиная с нуля) }
следующая операция будет производиться с тем элементом файла, перед которым установлен указатель... В приведенном выше случае, если сделать read(f, ch), то будет прочитан 20-ый символ (или байт, смотря как ты описал F) файла, если же сделать write(f, ch), то в 20-й символ будет записано значение ch... Как видишь, все не сложнее, чем с массивами.seek(f, 20);
read(f, ch);
ch := ... { <--- как-то обрабатываешь прочитанный символ }
write(f, ch); { <--- вот тут будь внимателен: ... }
... ch запишется не туда же, откуда был считан, а в следующий байт, поскольку после чтения указатель передвинется дальше.