Разработка программы обработки массива данных с построением диаграммы (предметная область-«Меню»)

Rewrite(f)-открытие файла в режиме записи. Если указанный файл отсутствует на диске, то он будет создан. Если файл существует и содержит данные, то все они будут удалены и заменены в дальнейшем новыми (перезаписаны).

Write(f, c), -запись данных в файл,где f – файловая переменная, с – выводимый из программы, но вводимый в файл символ.

Close- закрытие файла.

 

В программе использованы следующие процедуры и функции для графического режима:

InitGraph - инициализирует графический режим работы.

CloseGraph -удаляет графический  драйвер из памяти и осуществляет  переход в текстовый режим.

Line - вычерчивает отрезок прямой от точки до точки.

Circle -вычерчивает окружность.

SetFillStyle-устанавливает образец для заполнения площадки.

FloodFill-Если точка находится внутри ограниченной некоторыми линиями цвета поверхности, она закрашивается в соответствии с образцом, определенными процедурами.

SetColor - устанавливает текущий цвет.

OutTextXY-строка выводится, начиная с заданной позиции.

 

 

 

5. Методика отладки программы

 

Отладка программы является необходимым этапом при создании любой программы, т.к. при написании программы нередко допускаются различные ошибки. Отладка предполагает выполнение следующих этапов: выявление факта наличия ошибки в программе; определение места нахождения ошибки (локализация); устранение ошибки.

Ошибки в программе могут  быть трех типов: 

1. синтаксические, которые возникают при нарушении правил написания предложений языка;
2. семантические, связанные с недопустимыми значениями параметров, недопустимыми действиями над параметрами и т.д.; выявляются эти ошибки во время работы программы (обычно на этапе отладки);
3. логические ошибки, связанные с неправильным использованием тех или иных алгоритмических конструкций; эти ошибки приводят к неправильным результатам работы программы, но нарушение работы программы не вызывают.

 Семантические и логические  ошибки можно выявить тестированием  программы, с использованием встроенного отладчика.

При разработке и отладке  программы возникали некоторые ошибки следующих видов.

Синтаксические:  

3 : Unknown identifier

85 : «;» expected

Семантические:

2 : File not found

 

6. Руководство пользователя

 

Разработанная программа предназначена для обработки массива данных предметной области «Меню».

Запуск программы осуществляется с помощью исполняемого модуля KUS.exe.

После запуска программы на экране появляется название программы, информация о её разработчике и сообщения с просьбой нажатия клавши Enter для продолжения работы. После нажатия соответствующей клавиши клавиши на экран выводится горизонтальное меню, состоящее из 10 пунктов и сообщение с просьбой выбора необходимого пункта меню. Выбор пункта меню осуществляется нажатием цифры, соответствующей требуемому пункту меню. Нажатие других клавиш сопровождается сообщением о неверно нажатой клавише (возможные варианты ошибочных действий пользователя и сообщения, выводимые программой, представлены ниже в таблице 4).

Для выполнения пункта меню «Ввод данных» следует нажать клавишу 1 (рис.В1). Появится диалоговый запрос ввода данных в следующей последовательности:

1. введите количество создаваемых записей:
2. введите название блюда:
3. введите вес блюда:
4. введите цену блюда:

Далее после нажатия  клавиши Enter на экране отображается таблица с внесенными данными и заполненным полем «Цена со скидкой(10%)»( рис.В2) При введении данных пользователь может допустить ошибку, на что программа ответит соответствующим сообщением (варианты ошибочных действий пользователя и сообщения, выводимые программой, представлены ниже в таблице 4).

Нажатие функциональной клавиши 2 приведет к выводу таблицы на экран (рис. В3). Просмотреть состояние данных в таблице можно после выполнения любого пункта меню. Для возврата в главное меню следует нажать клавишу Enter. Пользователь может выбрать пункт меню «Запись в файл» путём нажатия клавиши 3. На экране появится сообщение с просьбой ввести путь, имя и расширение создаваемого файла, в который будут сохранены данные. На экране отображается сообщение о том, что запись в файл произведена успешно(рис.В4), в противном случае – сообщение об ошибке (рис. В5). Для продолжения работы необходимо  нажать клавишу Enter. Для чтения данных из файла следует нажать клавишу 4 и ввести имя файла, из которого следует считать данные.Если выполненные действия осуществлены верно, то на экране появится таблица с данными, а также сообщение об успешном чтении файла (рис. В6). В случае некорректного действия программа выдаст сообщение об ошибке (возможные варианты ошибочных действий пользователя и сообщения, выводимые программой, смотри ниже в таблице 4). Для продолжения работы необходимо  нажать клавишу Enter.

Программой предусмотрена возможность  изменения имеющегося набора данных.

Для дополнения массива записей следует нажать клавишу 5. На экран выведется сообщение с просьбой указать номер записи, после которой будет добавлена новая запись. И далее необходимо провести заполнение новых данных, следуя указаниям программы. После завершения дополнения на экране будет представлена новая дополненная таблица(рис. В7). Возврат в главное меню осуществляется нажатием клавиши Enter.

 Для удаления записи следует нажать клавишу 6. После чего пользователю будет предложено ввести название блюда, запись о котором следует удалить. Программа произведет поиск данных и в случае успешного завершения появится таблица с данными без удаленного элемента( рис. В8). В противном случае выдаст сообщение о том, что запись не найдена (рис. В9). После завершения данного пункта меню следует нажать любую клавишу для возврата в главное  меню.

  Также пользователь может осуществлять поиск необходимой записи по выбранному атрибуту. Для этого необходимо выбрать соответствующий пункт меню, нажав функциональную клавишу 7, и ввести название блюда, запись о котором нужно найти. Результат обработки запроса будет отражен на экране (рис. В10). Некорректные действия пользователя при выполнении поиска данных вызовут соответствующую реакцию программы (см. таблицу 4).

Программой предусмотрена возможность сортировки данных. Сортировка производится по полю «Цена блюда» и осуществляется нажатием  клавиши 8 в главном меню. Если данные не были введены, то программа выдаст сообщение об ошибке (рис. В11). Если сортировка прошла успешно, то программа выдаст сообщение об успешном окончании сортировки и таблицу с отсортированными данными (рис. В12).

Выбор пункта меню «Диаграмма» осуществляется нажатием клавиши 9.После чего на экране отобразится результат работы программы в графическом режиме в виде круговой диаграммы( рис. В13). Если в массиве отсутствуют данные, программа выдаст сообщение об ошибке (рис. В14). После вывода диаграммы следует нажать клавишу Enter для возврата в текстовый режим и главное меню программы.

Выход из программы осуществляется выбором пункта меню «Выход» и нажатим клавиши 10 в главном меню.

 

 

 

 

 

 

 

 

 

Таблица 4 – Вывод подсказок с указаниями к дальнейшим действиям

 

Сообщение программы	Тип сообщения	Действия оператора
Запись в файл произведена успешно.	Информация	Продолжить работу
Чтение произведено успешно.
Запись удалена.
Запись не найдена,  повторите ввод.
Запись найдена, результаты поиска.
Данные отсортированы по цене в  порядке возрастания
Введите необходимый пункт меню.	Запрос	Нажатие клавиши, соответствующей пункту меню.
Введите название блюда, запись о котором хотите удалить		Ввод названия блюда, нажатие клавиши Enter.
Укажите путь, имя, расширение файла.		Ввод имени файла и продолжение работы.
Введите имя файла для чтения.
Список не содержит записей, для  корректной работы выполните ввод.	Ошибка	Ввод правильных данных
Ошибка открытия файла.
Данные введены неверно, повторите  ввод.
Для продолжения работы нажмите  клавишу Enter	Указание к действию	Продолжить работу

 

 

 

 

Заключение

При выполнении курсового проекта  были выполнены все основные этапы создания автоматизированной информационной системы (АИС), а именно: постановка задачи; формализация; алгоритмизация; программирование (на языке Turbo Pascal); тестирование и отладка; документирование.

Результаты проверки показали, что разработанная программа правильно осуществляет все функции. В ходе выполнения данной работы закреплён навык создания и тестирования программы. Использование модульной структуры и подпрограмм – процедур значительно экономит память, занимаемую основной программой.

 

 

Литература

 

1. Пикулин В. В., Долгушева Л. Н., Бармин М.А. Информатика и программирование: Уч.-метод. разработка.– Пенза: Изд-во Пенз. гос. технол. акад., 2011. – 54 с.
2. О.А.Меженный Turbo Pascal Самоучитель. – М.: Диалектика, 2008. – 335с.
3. ГОСТ 19.701-90. ЕСПД. Схемы алгоритмов, программ, данных. Условные обозначения и правила выполнения.
4. ГОСТ 101-90. ЕСПД. Виды программ и программных документов.
5. ГОСТ 401-78. ЕСПД. Текст программы. Требования к содержанию и оформлению.
6. Alt+F10 Local menu 
   

ПРИЛОЖЕНИЕ A. Схема программы

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ПРИЛОЖЕНИЕ Б. Текст программы

 

Program MENU;                                                                

Uses CRT,Graph;                                                              

Type                                                                         

    ZAP = record                                                             

        nazv: string[20];                                                    

        ves:integer;                                                         

        cena:real;                                                         

        skid:real;                                                          

end;                                                                         

                                                                             

VAR                                                               

kod_k1:char;                                                                 

PM:byte;                                                                     

f_n:string;                                                                  

F:file of zap;                                                               

M: array [1..100] of ZAP;                                                    

i,n,del,pn:integer; {pn-признак  нахождения элемента массива записей}         

                         {index-индекс удаляемого элемента,i,n-счётчик}      

bludo:string[20];                                                            

mz,Elem1:zap;{элемент  массива записей}                                       

n1, Code: byte; {n1-номер  записи для осуществления дополнения}               

 

 

Procedure VVOD;  {процедура заполнения массива данных}                       

label M1,M2,M3, M33;                                                         

Begin                                                                        

clrscr;                                                                      

{$i-}                                                                        

M3: Write(' Введите количество  создаваемых записей n= ');                    

Readln(n);                                                                   

if(ioresult<>0 ) or(n<0)                                                     

   then                                                                      

   begin                                                                     

   writeln(' Данные введены  неверно, повторите ввод');                       

   goto M3;                                                                  

   end;                                                                      

{$i+}                                                                        

Writeln;                                                                     

For i:=1 to n do                                                             

    With  M[i] do                                                            

    Begin                                                                    

    Writeln('  ',i,'-я запись: ');                                           

    Write('Введите название  блюда: ');