Ну, Сохранение:
AssignFile(output, 'MyFile.txt');
Rewite(output); //Если перезаписать полностью
......
write('Что нужно'); //Ну или writeln('Что нужно');
.....
CloseFile(output);
Чтение почти тоже самое:
AssignFile(input, 'MyFile.txt');
Reset(input);
....
Read('Что нужно'); //Или Readln('Что нужно');
....
CloseFile('Что нужно');
Надеюсь сообразишь в каком формате сохранять
|