Категория
Информатика
Тип
курсовая работа
Страницы
11 стр.
Дата
10.05.2009
Формат файла
.rtf — Rich Text Format (Wordpad)
Архив
110558.zip — 20.85 kb
  • baza-dannyx-sotrudniki_110558_1.rtf — 247.23 Kb
  • Readme_docus.me.txt — 125 Bytes
Оцените работу
Хорошо  или  Плохо


Текст работы

ские типы:
worker – тип динамической
памяти типа base ;
base – тип – запись(информация о сотрудниках);
sotrud – для работы с файлами типа base .
Используемые процедуры:
Punct 1 – по этой процедуре
осуществляется занесение служащего в файл.
Punkt 3 - вывод списка в алфавитном порядке. Сортировка происходит по полю “ fam ”;
Punkt 4 – по этой процедуре
производится сортировка списка по величине оклада.
Punkt 5 – выводит служащего с указанной должностью . Вводится нужная должность и при обходе списка происходит сравнение по полю “
dolg ” и вывод этой записи;
Punkt 2 - удаление записи из списка (удаление происходит по введённому пользователем регистрационному номеру и Ф.И.О.);
Punkt 0 - в этой процедуре происходит перезапись файла и обнуление односвязного списка.
Приложение 1
Листинг программы
program kursovaia;
uses crt;
const norm=$74; цвет
не выделенного пункта
norm1=$8;
sel=$31; цвет выделенного пункта
sel1=$15;
type
------------------- описание
записи ----------------
Worker = ^base;
base=record
rnom:integer;
РЕГИСТРАЦИОННЫЙ
НОМЕР
fam:string[20];
ФАМИЛИЯ
name:string[20];
ИМЯ
otch:string[20];
ОТЧЕСТВО
date:string[20];
ДАТА
РОЖДЕНИЯ
pol:string[20];
ПОЛ
stag:integer;
СТАЖ
РАБОТЫ
adress:string[30];
ДОМАШНИЙ
АДРЕС
tel:integer;
ТЕЛЕФОН
dolg:string[20];
ДОЛЖНОСТЬ
oklad:integer;
ОКЛАД
link:worker;
------------------------------------------------- end;
var



Ваше мнение



CAPTCHA