Автор работы: Пользователь скрыл имя, 10 Января 2010 в 20:49, Не определен
Постановка  задачи
Структура данных
Алгоритм
Интерфейс
Процедуры и функции
Листинги
Выводы
Литература
Санкт-Петербургский 
государственный 
Факультет 
инноватики 
 
 
Дисциплина: 
Теория и технология 
программирования 
Тема: База данных «Расписание поездов»
  
 
| Выполнил студент гр. 2221/1 | Керсанова Л.В ________________                               Селиванова С.В ________________                               | 
| Преподаватель: | к.т.н., доц. Культин Н.Б. | 
| «__» ____________ 2008 | 
Санкт-Петербург
2008
Оглавление 
Написать программу работы с базой данных «Расписание поездов» (рис. 1).
| Адрес | Телефон | Район | |
| ДМШ № 19 | Рижский пр. д.8 | 2596342 | Адмиралтейский | 
| ДМШ № 31 | Наб. Обводного канала д. 123-б | 3161201 | Адмиралтейский | 
| ДМШ им. Ляховильцкой | Садовая ул. д. 32 | 3100456 | Адмиралтейский | 
| Вдохновение | 4-я линия д.29 | 3237377 | Василеостровский | 
| ДМШ № 38 | ул. Симонова д. 8 | 5154003 | Выборгский | 
| ДМШ им. Бородина | пр. Просвещения д. 82 | 5944645 | Калининский | 
| ДМШ № 9 | ул. Гладкова д. 3 | 7865058 | Кировский | 
| ДМШ № 41 | ул. Косыгина д. 28 | 5241562 | Красногвардейский | 
          
Рис. 1. База данных, представленная  
в виде таблицы 
Программа должна обеспечить решение следующих задач:
       
Запрос в базе данных выполняется по району, 
в котором расположена музыкальная школа. 
Результатом является вывод на экран полной 
информации  о школах запрашиваемого района 
(название школы, адрес, телефон). 
 
 
 
 
2. 
Структура данных 
   На диске 
компьютера база данных представляет 
собой текстовый файл. (Листинг 1). 
 
Листинг 1. Файл 
данных: 
ДМШ № 19
Рижский пр. д.8
2596342
Адмиралтейский
ДМШ № 31
Наб. Обводного канала д. 123-б
3161201
Адмиралтейский
ДМШ им. Ляховильцкой
Садовая ул. д. 32
3100456
Адмиралтейский
Вдохновение
4-я линия д.29
3237377
Василеостровский
ДМШ № 38
ул. Симонова д. 8
5154003
Выборгский
ДМШ им. Бородина
пр. Просвещения д. 82
5944645 
 
 
В оперативной памяти база данных представлена в виде совокупности массивов:
     
name:array [1..HB] of string[25];
adres: array [1..HB] of string[60];
phone: array [1..HB] of string[10];
   rayon: array [1..HB] 
of string[20]; 
 
 
 
 
 
 
3. 
Алгоритм 
Алгоритм программы 
приведен на рис. 2. 
 
 
 
 
  
 
                                     
  
com=1 com=3
com=2
  
 
 
 
 
 
 
Нет Да
           
                                      
 
 
                              
 
                              
 
 
Рис. 2.1. Алгоритм программы
                              
 
 
 
                              
                              
true
                                           
 
 false 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Рис. 2.2. Алгоритм загрузки БД
Взаимодействие с пользователем осуществляется при помощи меню и диалогов.
    (Рис. 
3.1 – Рис. 3.3) 
 
    
 
 
        
Рис. 3.1. Главное меню 
 
 
 
 
 
          
 
 
        Рис. 
3.2. Диалоги ввода информации 
 
 
 
           
      
Рис. 3.3. Выполнение запроса 
 
 
 
 
 
 
 
 
| Процедура (функция) | Описание | Разработчик | 
| Function Menu | Меню базы данных | Керсанова Л.В. | 
| Procedure LoadDB | Загрузка БД из файла | Керсанова Л.В | 
| Procedure ShowDB | Просмотр информации | Керсанова Л.В | 
| Procedure SearchDB | Поиск в БД | Селиванова С.В | 
| Procedure AddDB | Добавление данных в БД | Керосанова Л.В | 
| Procedure Save | Сохранение БД | СелтвановаС.В | 
| Оформительская работа | Оформление отчета | Селиванова С.В | 
    
6. Листинги 
       
В листингах приведены 
 
Листинг 
6.1.  Процедура загрузки БД из файла 
procedure LoadDB;{Процедура загрузки данных из файла}
var
      
f:text; 
    begin 
         
assign(f,'c:\tp7\School.txt');
      
reset(f); {открыть файл для чтения} 
 
      
nRec:=0; {количество записей} 
while not EOF(f) do{пока не будет достигнут конец файла выполняется цикл}