Курсовая работа: База даних по приватних підприємствах регіону
В складних випадках створення підказок для користувача;
Швидкість та простота роботи в даній програмі;
1.2 Формальна постановка задачі
Вихідні дані:
Нехай П={П1 ,П2 ,…,Пi }, де ( i=1, 2, ..., N ) – множина підприємств.
Рi є Пi – ПІБ власника приватного підприємстваFi є Пi – адреса підприємстваDi є Пi – рід діяльності підприємстваHi є Пi – назва підприємстваLi є Пi – номер телефону
Таким чином отримуємо нову сукупність Пij – яка більш розширена в плані інформації про підприємства
Результат:
Множина Zj , яка формуються з вхідних даних а саме множини Пij.
Таким чином множина Zj є підмножиною Пij
1.3 Структура зберігаючих даних
Tyr – запис, який приймає на себе відомості та потім зберігається в файл.
- Naz – поле куди заноситься назва підприємства
- Vd – поле куди заноситься вид діяльності підприємства
- Reg – поле куди заноситься інформація про адресу підприємства
- Vl – ПІБ власника приватного підприємства
- Nt – поле куди заноситься телефон підприємства
F – типізований файл
Kl – процедура яка малює рамочку
Rrr – процедура яка вимальовує меню без управляючої частини
Into – процедура для збереження відомостей, які ввів користувач, до файлу.
Is – процедура яка забезпечує виконання пошуку
Ud – процедура для видалення
2. Алгоритми
2.1 Алгоритм основної програм и
2.1 Алгоритм процедури Is
3. Вихідний код програми
uses crt,dos;
type tyr=record
naz,vd,reg,vl,nt :string[15];
end;
var f:file of tyr; pr:tyr;