Поменять местами наибольший и наименьший элементы файла.

[dimanoxxy]

Здравствуйте. помогите сделать программу, пожалуйста. задание такое:
Дан файл целых чисел A.DAT. Поменять местами наибольший и наименьший элементы файла.
помогите если можете!! буду очень благодарен! завтра нужно сдать эту программу

[Arigato]

Работать с файлами умеете? Вот что потребуется:
var f: file of Integer; - объявить файловую переменную.
a: Integer; - целочисленная переменная.
Assign (f, 'A.DAT') - привязать имя файла к файловой переменной.
Reset (f) - открыть файл для чтения и записи.
Read (f, a) - прочитать очередной элемент файла в переменную a.
EOF (f) - проверить, не достигнут ли конец файла.
FilePos (f) - текущая позиция в файле.
Seek (f, n) - переместить текущую позицию файла в позицию n.
Write (f, a) - записать в файл f значение переменной a в текущую позицию.
Close (f) - закрыть файл.
Ну а найти максимум и минимум - это совсем уже детская задача.

[dimanoxxy]

если не сложно можешь написать сам код программы?? просто в паскале я совсем новечёк!! пока не разбираюсь в нем

[Arigato]

Сообщение от dimanoxxy

если не сложно можешь написать сам код программы??

Не могу и другим не советую писать тут готовый код!
Вы либо сами разбирайтесь (все, что вам потребуется, я уже привел), либо дуйте в раздел Фриланс и там вам за соответствующую плату решат задачу.

[dimanoxxy]

блин. очень плохо. просто я в паскале совсем не разбираюсь, задачу завтра нужно сдать. ладно, придется ночку почитать про него. может сделаю че. спасибо и на этом.

[Arigato]

Сообщение от dimanoxxy

ладно, придется ночку почитать про него. может сделаю че.

Вот видите какая польза, хоть учиться начнете. А так дали бы готовое решение, так бы и дальше ничего не понимали бы.