Разработка программы в среде Pascal - Курсовая работа

бесплатно 0
4.5 60
Разработка и тестирование программы на языке Pascal для поиска, вывода на экран и сохранения в файл списка книг с фамилиями авторов в алфавитном порядке, изданных после 2012 года. Разработка алгоритма и его описание. Инструкции по эксплуатации приложения.


Аннотация к работе
Современные информационные системы организационного управления предназначены оказывать помощь специалистам, руководителям, принимающим решения, в получении ими своевременной, достоверной, в необходимом количестве информации, создании условий для организации автоматизированных офисов, проведении с применением компьютеров и средств связи оперативных совещаний, сопровождаемых звуковым и видеорядом. Новая информационная технология - это технология, которая основывается на применении компьютеров, активном участии пользователей (непрофессионалов в области программирования) в информационном процессе, высоком уровне дружественного пользовательского интерфейса, широком использовании пакетов прикладных программ общего и проблемного назначения, возможности для пользователя доступа к удаленным базам данных и программам благодаря сетям ЭВМ. Один из наиболее известных языков программирования, широко применялся в промышленном программировании, до сих пор используется для обучения программированию в высшей школе, является базой для ряда других языков.Согласно условию задания, главной функцией программы является поиск, вывод на экран и сохранение в файл списка книг с фамилиями авторов в алфавитном порядке, изданных после 2012 года; списка книг заданного автора. Программа должна выполнять следующие функции: 1)Добавление в файл автора, название книги, год издания книги (автор, название книги, год издания книги заносится пользователем с клавиатуры).Информация необходимая для работы программы определена в условии задания: Автор книги; Год издания книги Этой информации достаточно, что бы отобрать и отобразить список нужных рейсов. Можно воспользоваться заранее подготовленной информацией или же можно заменить или дополнить ее при помощи программы. Ниже в таблице приведены заранее подготовленные данные: Автор книги Название книги Год издания книгиПоэтому необходимо учитывать следующие критерии: - наглядность интерфейса. Незнающий человек не должен тратить много времени на освоение интерфейса программы; Главное меню нашей программы будет выглядеть, как показано на рисунке (рис.Цикл с постусловием(repeat): Оператор используется, когда количество повторений заранее неизвестно, а задано некоторое условие выхода из цикла. Цикл с постусловием - это цикл, в котором проверка условия выполняется в конце цикла. Оператор ветвления(if): К операторам, позволяющим из нескольких возможных вариантов выполнения программы (ветвей) выбрать только один, относится if . Если условие истинно, то выполняется , если ложно - оператор, следующий сразу за оператором. В операторе if по обеим ветвям (then и else) может выполняться только один оператор!Перед тем как начать писать программу в среде разработки, нам необходимо продумать каждый ее шаг, для наглядного представления воспользуемся блок-схемами. Пользователю предоставляется возможность ввода информации, если информация проходит проверку на корректность ввода, то она записывается в исходный файл (input.txt). repeat //Проверка на корректный ввод года writeln("Введите год издания: "); Потом производится проверка на год издания книги автора, если проверка пройдена, то на экрани в отдельный файл(output1.txt)выводится год издания книги и происходит сортировка авторов по алфавиту. Ниже приведен исходный код: while not eof(f) do with S do begin //* read(f, S); //Преносим данные if(S.god >= 2012) then begin //из файла mas[i] := S ; //в массив i:=i 1; //для дальнейшей end; //сортировки end; //На (Рис.4) изображено главное меню программы. Для выбора пункта меню необходимо: ввести цифру стоящую рядом с нужным нам пунктом и нажать Enter. Итак, для начала выберем пункт 1 (рис.5). Программа предлагает ввести некоторое количество записей (для примера мы введем 1).В результате выполнения программы я использовал разные циклы для ее выполнения.Я взял эту программу для написания курсовой, потому что она проста в использовании и подходит для начинающих. C помощью моей программы можно определить какая вас книга интересует и есть ли она или даст вам список книг выпущенных в настоящее время новых книг.typebook = record //Структуразаписей aut:string; //Автор (Фамилия) nazv:string; //Название книги god:integer; //Годиздания end; var S: book; //Указатель на структуру записей f : file of book; //Файл хранения записей f1 : text; //Файл вывода книг с 2012 года f2 : text; //Файл вывода списка книг данного автора autor : string; //Переменная хранения автора(усл.зад.) m : byte; //Переменная счетчик i : byte; //Переменная счетчик j : byte; //Переменная счетчик men : byte; //Переменная выбора пунктов меню mas : array [1..1000] of book;//Массив в котором происходит сортировка begin repeat //Начало цикла перехода в начало меню repeat //Проверка на корректность выбора пункта меню writeln(" *Выберите пункт меню*"); assign(f, "input.txt"); //Подключение файла ввода reset(f); //Открываем файл на дозапись seek(f, filesize(f)); //Устанавливаем курсор в конец файла for i:=1 to m do begin writeln("Введите фам

План
СОДЕРЖАНИЕ

Введение

1. Постановка задачи

2. Определение выходных данных

3. Интерфейс программы

4. Проектирование программы

5. Разработка алгоритма и его описание

6. Инструкции по эксплуатации приложения

7. Тестирование программы

8. Заключение и вывод

Литература

Приложение

Список литературы
1. Прищепов М. А. Программирование на языках Basic, Pascal и Object Pascal в среде Delphi: Учебное пособие. - Мн.: ТЕТРАСИСТЕМС, 2006. - 320с.

2. Алексеев В. Е. Вычислительная техника и программирование. Практикум по программированию: Практ. пособие. - М.: Высш.шк., 1991.-400с.

3. Абрамов В. Г., Трифонов H. П., Трифонова Г. H. Введение в язык паскаль. - М.: Наука, 1988. - 320 с.

4. Алкок Д. Язык Паскаль в иллюстрациях - М.: Мир, 1991. - 192 с.

5. Боон К. Паскаль для всех. - М.: Энергоатомиздат, 1988. - 190 с.
Заказать написание новой работы



Дисциплины научных работ



Хотите, перезвоним вам?