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

Министерство образования и науки Российской Федерации Филиал «СЕВМАШВТУЗ»

Государственного образовательного учреждения высшего профессионального образования Санкт-Петербургский государственный морской технический университет в г. Северодвинске Факультет 4

Кафедра 14 «Информатика»

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

Студент: Крутикова Е.Н.

Группа: 1295

Руководитель: Паранинцева Ж.Ю.

Северодвинск 2011

• Введение
• Цели и задачи курсовой работы
• Входная информация
• Алгоритм решения
• Листинг программы
• Результат программы
• Заключение
• Список литературы
• Приложение А

Pascal ABC 3.0.1 — Система предназначена для обучения программированию на языке Паскаль и ориентирована на школьников и студентов младших курсов. Эта система призвана осуществить переход от простейших программ к модульному, объектно-ориентированному, событийному и компонентному программированию. Многие концепции в Pascal ABC упрощены, что позволяет использовать их на более ранних этапах обучения. Модуль графики обходится без объектов, хотя его возможности практически совпадают с графическими возможностями Borland Delphi. Простейшие событийные программы можно писать, пользуясь лишь процедурными переменными. В консольных программах можно создавать таймеры и звуки, которые реализованы без использования объектов. В модулях может отсутствовать разделение на секцию интерфейса и секцию реализации; в этом случае модули устроены практически так же, как и основная программа, что проще на ранних этапах обучения. Тела методов можно определять непосредственно внутри классов, что позволяет создавать классы практически сразу после изучения записей, процедур и функций. Имеется модуль контейнерных классов (динамические массивы, стеки, очереди, множества), а также библиотека визуальных компонентов. Компилятор Pascal ABC не генерирует исполняемый код в виде .exe-файла, а создает в результате компиляции дерево программы в памяти, которое затем выполняется с помощью встроенного интерпретатора. В систему Pascal ABC интегрирована мини-версия электронного задачника Programming Taskbook (автор М.Э.Абрамян), содержащая 200 задач разного уровня сложности из всех основных разделов базового курса программирования: от скалярных типов и управляющих операторов до составных структур данных, рекурсивных алгоритмов и указателей. Электронный задачник обеспечивает генерацию исходных данных для каждого задания, проверку правильности решения, а также ведение протокола выполнения заданий. Использование электронного задачника существенно ускоряет процесс выполнения заданий, так как избавляет учащегося от дополнительных усилий по организации ввода-вывода.

Цели и задачи курсовой работы

1. Сформировать навыки разработки и отладки программ сложной структуры;

2. Закрепить знания использования средств изучаемых систем программирования для описания и оперирования наборами данных различных типов.

Входная информация

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

Алгоритм решения

1. Создать тип записи с именем Kniga, содержащий поля: порядковый номер (n), автор (FIO), название (naim), количество экземпляров (ekz), количество книг (m);

2. Объявить массив с элементами типа Klient (5 элементов);

3. Заполнить массив 5-ю записями;

4. Вывести всю информацию на экран;

5. Ввести с клавиатуры интересующую Вас книгу;

6. Просмотреть весь массив и сложить все книги, находящиеся в наличии.

7. Данную программу можно представить в виде блок — схемы (приложение А).

Листинг программы

program Primer;

uses crt;

type Kniga=record

n:integer;

FIO:string[15];

naim:string[15];

ekz:integer;

end;

var

mas:array[1.5] of Kniga;

i, k, m:integer;

S:string;

begin

for i:=1 to 5 do

begin

writeln ('Введите порядковый номер');

readln (mas[i]. n);

writeln ('Введите ФИО');

readln (mas[i]. FIO);

writeln ('Введите название книги');

readln (mas[i]. naim);

writeln ('Введите количество экземпляров');

readln (mas[i]. ekz);

end;

clrscr;

writeln ('>+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< ');

write ('№ ФИО Название Кол-во экз.');

writeln;

k:=0;

for i:=1 to 5 do

begin

write (k, mas[i]. FIO:15,mas[i].naim:15,mas[i].ekz:3);

writeln;

end;

writeln ('>+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+< >+<');

writeln ('Продолжим!!!');

readln;

clrscr;

writeln ('Введите интересующего Вас автора книги');

readln (S);

clrscr;

writeln ('***********************************************************';

writeln (' В БИБЛИОТЕКЕ КНИГ ', s,': ');

write (' Автор Кол-во экз.');

writeln;

for i:=1 to 5 do

begin

if s=mas[i]. FIO then

write (mas[i]. fio:15,mas[i].ekz:5)

end;

writeln ('***********************************************************';

writeln ('Введите интересующую Вас книгу');

readln (S);

clrscr;

write (' Название Кол-во экз.');

writeln;

for i:=1 to 5 do

begin

if s=mas[i]. naim then

write (mas[i]. naim:10,mas[i].ekz:5)

end;

writeln ('******************************************************************');

m:=0;

for i:=1 to 5 do

m:=(m+mas[i]. ekz);

writeln (m);

writeln ('Количество всех книг равно', m);

end.

Результат программы

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

Далее пользователю предлагается ввести интересующего его автора. И выводится на экран информация о порядковом номере, авторе, названии книги и количество экземпляров в библиотеке (рис. 2).

Затем пользователя просят ввести интересующее название книги. Таким образом выводится информация на экран о конкретной книге и количество ее экземпляров в библиотеке в наличии. А также все имеющиеся в наличие в библиотеке книги (рис. 3).

Рис. 1

Рис. 2

pascal программный поиск документ Рис. 3

Заключение

В результате выполнения курсовой работы был создан продукт, который позволяет при вводе порядкового номера, автора, названия книги и количества экземпляров вывести на экран упорядоченную таблицу. Также при вводе автора книги выводит всю информацию о его книгах на экран, при вводе названия книги выводит всю информацию о книге. Программный продукт можно модернизировать: добавить данные о дате поступления экземпляров, о состоянии интересующего экземпляра, о возможных списаниях экземпляра в связи с утерей или порчей. Данный продукт можно применять как в библиотеках, так и в архивах различного типа.

1. Йенсен К., Вирт Н. Паскаль. Руководство для пользователя и описание языка. — М.: Финансы и статистика, 1982. — С. 151.

2. Вирт Н. Алгоритмы + структуры данных = программы. — М.: Мир, 1985. — С. 406.

3. Грогоно П. Программирование на языке Паскаль. — М.: Мир, 1982. — С. 384.

4. Перминов О. Н. Язык программирования Паскаль: Справочник. — М.: Радио и связь, 1989. — С.128.

5. Моргун А. Н. Программирование на языке Паскаль (Pascal). Основы обработки структур данных. — М.: Диалектика, 2005. — С. 576.

6. Рубенкинг Н.Дж. Турбо Паскаль для Windows. Пер. с англ. — М.: Мир, 1993.