Файл file.bin и мне его надо перенести в массив, сть файл file.bin и мне его надо перенести в массив но у меня это не п Опции

[Cube]

Здравствуйте у меня вот проблема я новичок в программирование. У меня вот такая проблема есть файл file.bin и мне его надо перенести в массив но у меня это не получается, пишу на Turba pascal’e.

C Уважением Антон

[volvo]

На сколько я понял удобней будет работать через массив с информацией?

Удобнее чем напрямую с файлом? Вряд ли... Кроме всего прочего, если файл будет больше 64Кб, то у тебя начнутся дополнительные проблемы. Оно тебе надо?

Просто:

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 запишется не туда же, откуда был считан, а в следующий байт, поскольку после чтения указатель передвинется дальше.

Вот в все, что тебе нужно знать для того, чтобы начать делать свою программу (в FAQ-е есть тема "Файлы", там тоже почитай), что не получится - обращайся