Разработка компьютерной программы - автоматического телефонного спавочника. Описание алгоритма программы. Описание последовательности действия при составлении и редактировании базы данных. Основные операторы и группы операторов. Анализ программы.
При удалении или изменении записи создается временный файл с именем temp.dat, в него записываются все данные из файла phone.dat кроме тех которые были удалены или записываются уже измененные данные, затем файл phone.dat удаляется, а файл temp.dat переименовывается в phone.dat. 2. Закрываем файл при помощи оператора Close, это необходимо для того, чтобы другие процедуры могли с ним работать. procedure WritePhone; begin Assign(PhoneF,Phone\phone.dat); Reset(PhoneF); ClrScr; writeln(Все записи:); writeln; while not Eof(PhoneF) do begin PhoneR.SurnameS:=; PhoneR.NameS:=; PhoneR.PhoneS:=; PhoneR.AddressS:=; read(PhoneF,PhoneR); writeln; write(PhoneR.SurnameS); write( ,PhoneR.NameS); write(,PhoneR.PhoneS); write(,PhoneR.AddressS); end; Close(PhoneF); writeln; writeln; write(Нажмите любую клавишу...); ReadKey; end; Процедура AddPhone - данная процедура добавляет запись.
Вы можете ЗАГРУЗИТЬ и ПОВЫСИТЬ уникальность своей работы