Разработка приложения для Windows, представляющего собой компьютерную модель информационной системы«Автоматизированная информационная система бронирования авиабилетов

Размещено на http://www.allbest.ru/

Департамент образования и науки Тюменской области

Государственное бюджетное образовательное учреждение

среднего профессионального образования Тюменской области

«Западно-Сибирский государственный колледж»

КУРСОВАЯ РАБОТА

По дисциплине: «Технология разработки программных продуктов»

Тема: «Разработка приложения для Windows, представляющего собой компьютерную модель информационной системы «Автоматизированная информационная система бронирования авиабилетов»

Специальность 230105 «Программное обеспечение вычислительной техники и автоматизированных систем»

Выполнил:

студент гр. ВТ - 101

Ботезату, Д.Ю.

Проверила: Ли Е.Ф.

Тюмень, 2012 г.



Содержание

Введение

1. Эскизный и технический проект программы

1.1 Назначение и область применения

1.2 Технические характеристики

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

1.2.2 Описание алгоритма

1.2.3 Организация входных и выходных данных

1.2.4 Выбор состава технических и программных средств

2. Рабочий проект программного приложения

2.1 Разработка программы

2.2 Спецификация программы

2.3 Текст программы

2.4 Описание программы

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

3. Оценка программы

Заключение

Литература



Введение

Настоящее техническое задание распространяется на разработку программы автоматизированной информационной системы «Бронирование авиабилетов», предназначенной для людей посещающих аэропорт.



1. Эскизный и технический проект программы

1.1 Назначение и область применения

Данная программа является автоматизированной информационной системой. Областью применения данной программы является справочник, содержащий сведения о бронировании авиабилетов. Так как, поставлена задача, разработать приложение под операционную систему Windows, то использоваться программа может только в среде 32-битной операционной системы Windows 9х/ME/NT/2000/XP.

1.2 Технические характеристики

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

Основание для разработки

1.1.Программа разработана в рамках курсового проектирования по дисциплине “Техническая разработка программных продуктов”

1.2.Наименование работы: “Бронирование авиабилетов”

1.3.Исполнитель: Ботезату Дмитрий.

1.4.Соисполнители: нет

Назначение

Программа предназначена для хранения и обработки информации о бронировании авиабилетов.

Требования к программе или к программному изделию

1.Требования к функциональным характеристикам:

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

· Обеспечивать первоначальный ввод данных в информационную систему и формирование линейного списка;

· Производить вывод всего списка;

· Вводить номер рейса и выводит все данные об этом рейсе;

· Вводить дату вылета и выводит данные обо всех рейсах, вылетающих в этот день.

Ш Исходные данные:

· Пункт назначения;

· Номер рейса;

· Фамилия И.О пассажира.

· Дата вылета

Ш Организация входных и выходных данных.

· Входные данные поступают с клавиатуры.

· Выходные данные отображаются в виде линейного списка при необходимости вывод на принтере.

Требования к программной документации

1.Разрабатываемые программные модули должны быть самодокументированы, то есть тексты программ должны содержать все необходимые комментарии.

2.Разрабатываемая программа должна включать справочную информацию о работе программы.

1.2.2 Описание алгоритма

Общий не детализированный алгоритм выполнения данной программы можно представить в виде блок схемы изображенной на рис. 1.



Рисунок 1. Общая блок-схема АИС «Бронирование авиабилетов»

Словесно эту блок-схему можно описать как следующую последовательность действий:

· Инициализация процесса (запуск программы).

· Считывание исходных данных (заполнение БД):

o Из файла;

o Ввод с клавиатуры.

· Выбор параметров поиска информации:

o По номеру рейса;

o По дате вылета;

· Поиск информации в базе данных.

· Вывод результатов поиска на экран (в отдельном окне).

Для оформления данного подпункта используется ГОСТ 19.701-90 ЕСПД. Схемы алгоритмов, программ, данных и систем. Условные обозначения и правила выполнения.



1.2.3 Организация входных и выходных данных

В программе были использованы входные данные текстового и числового типа:

Существует два способа ввода этих данных в программу:

- прямая загрузка с клавиатуры;

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

Выходные данные представляют собой текстовую информацию, выводимую на экран монитора.

1.2.4 Выбор состава технических и программных средств

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

Технические средства, достаточные для оптимальной работы программы:

- Windows 9x/ME/NT/2000/XP.

- Видео память не менее 1Mb.

- Оперативной памяти не менее 16 Mb.

- Процессор IntelPentium 166 и выше.

- Объем свободного места на жестком диске не менее 500 Мб.

- Манипуляторы: клавиатура и мышь.



2. Рабочий проект программного приложения

2.1 Разработка программы

программа автоматизированная информационная алгоритм

Как уже отмечалось, для разработки автоматизированной информационной системы "Бронирование авиабилетов" используется среда визуального программирования Delphi. В данной среде был создан проект с названием Project1.dpr.Данный проект состоит из трех программных модулей и трех форм: Form1: (см. рис. 2)

Рисунок 2. Главная форма АИС «Бронирование авиабилетов»



Главная форма представляет собой стандартное окно класса TForm и содержит следующие необходимые для функционирования программы компоненты, расположенные ниже, в порядке их размещения:

1. Form1: TForm - основная форма проекта. Контейнер всех объектов.

2. StringGrid1: TStringGrid - Отображение введенных данных.

3. MainMenu1: TMainMenu - Главное меню программы.

4. Label1: Tlabel - вывод заголовка.

Номер компонента
1	Название и имя	Label1
	Назначение	Вывод заголовка
	События
	Свойства	Left = 32 Top = 24 Width = 505 Height = 38 Caption = 'Бронирование авиабилетов' Font.Charset = DEFAULT_CHARSET Font.Color = clPurple Font.Height = -32 Font.Name = 'BookmanOldStyle' Font.Style = [fsBold, fsItalic] ParentFont = False
2	Название и имя	StringGrid1
	Назначение	Отображение введенных данных
	События
	Свойства	Left = 72 Top = 80 Width = 417 Height = 281 Color = clSilver ColCount = 4 FixedCols = 0 RowCount = 11 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing] ParentFont = False TabOrder = 0 ColWidths = ( 105 142 120)
3	Название и имя	MainMenu1
	Назначение	Главное меню программы
	События	Щелчокпопунктуменю objectN2: OnClick = N2Click object N3: OnClick = N3Click object N5: OnClick = N5Click object N6: OnClick = N6Click object N7: OnClick = N7Click
	Свойства	objectN1: TMenuItem Caption =Данные objectN2: TMenuItem Caption = Ввести данные OnClick = N2Click end objectN8: TMenuItem Caption = Очиститьтаблицу OnClick = N8Click end objectN9: TMenuItem Caption = Выход OnClick = N9Click end end objectN5: TMenuItem Caption = Поиск objectN6: TMenuItem Caption = по номеру рейса OnClick = N6Click end objectN7: TMenuItem Caption = по дате вылета OnClick = N7Click End
4	Название и имя	Form1
	Назначение	Окно программы
	События
	Свойства	Left = 365 Top = 197 Width = 562 Height = 495 Caption = Бронирование авиабилетов Color = clSilver Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False Visible = True OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13

Рисунок 3. Вторая форма АИС «Отправка поездов»

Вторая форма представляет собой стандартное окно класса TForm и содержит следующие необходимые для функционирования программы компоненты, расположенные ниже, в порядке их размещения:

1.Form2: TForm - вторая форма проекта. Ввод данных.

2.StringGrid1: TStringGrid - Отображение введенных данных

3.Label1: Tlabel - вывод заголовка.

4.Button1: TButton1 - «Запись данных в таблицу».

5.Button2: TButton2 - «Очистка таблицы».

6.Button3: TButton3 - «Выход».

Номер компонента
1	Название и имя	Label1
	Назначение	Вывод заголовка
	События
	Свойства	Left = 32 Top = 8 Width = 408 Height = 31 Caption = Введите данные в таблицу Font.Charset = RUSSIAN_CHARSET Font.Color = clBlue Font.Height = -27 Font.Name = 'Trebuchet MS' Font.Style = [fsBold, fsItalic] ParentFont = False
2	Название и имя	StringGrid1
	Назначение	Ввод исходных данных
	События
	Свойства	Left = 32 Top = 40 Width = 401 Height = 281 HelpContext = 225 Color = clWindowText ColCount = 4 FixedColor = clBtnFace FixedCols = 0 RowCount = 11 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing] ParentFont = False TabOrder = 0 OnKeyPress = StringGrid1KeyPress ColWidths = ( 105 142 120)
3	Название и имя	Button1
	Назначение	Записывает введенные данные в массив записей
	События	ЩелчокпокнопкеOnClick = Button1Click
	Свойства	Left = 40 Top = 344 Width = 113 Height = 25 Caption = Записатьданные TabOrder = 1 OnClick = Button1Click
4	Название и имя	Button2
	Назначение	Очищает таблицу (компонент StringGrid1)
	События	ЩелчокпокнопкеOnClick = Button2Click
	Свойства	Left = 184 Top = 344 Width = 105 Height = 25 Caption = Очиститьтаблицу TabOrder = 2 OnClick = Button2Click
5	Название и имя	Button3
	Назначение	Закрытие формы 2
	События	ЩелчокпокнопкеOnClick = Button3Click
	Свойства	Left = 328 Top = 344 Width = 113 Height = 25 Caption = Закрыть TabOrder = 3 OnClick = Button3Click

Рисунок 4. Третья форма АИС «Отправка поездов»

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

1.Form3: TForm - третья форма проекта.

2.Memo:TMemo - «Вывод сведений при поиске»

3.Label1: Tlabel - Вывод заголовка.

4. Button1: TButton1 - «Выход».



Номер компонента
1	Название и имя	Label1
	Назначение	Вывод заголовка
	События
	Свойства	Left = 8 Top = 16 Width = 410 Height = 22 Font.Charset = RUSSIAN_CHARSET Font.Color = clMaroon Font.Height = --19 Font.Name = 'Bookman Old Style' Font.Style = [fsBold, fsItalic] ParentFont = False
2	Название и имя	Memo1
	Назначение	Вывод искомых данных
	События
	Свойства	Left = 48 Top = 88 Width = 321 Height = 137 Color = clMenuHighLight Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0
3	Название и имя	Button3
	Назначение	Закрытие формы 3
	События	ЩелчокпокнопкеOnClick = Button3Click
	Свойства	Left = 168 Top = 240 Width = 75 Height = 25 Caption = Закрыть TabOrder = 1 OnClick = Button3Click



2.2 Спецификация программы

Исполняемый файл программы «Отправка поездов» имеет название Отправка поездов.exe. Помимо исполнимого файла в проект включены следующие файлы (таблица 1):

Таблица 1

Таблица файлов входящих в проект

Наименование	Обозначение	Примечание
Project1.dpr.	Файл проекта	Связывает все файлы приложения
Project1.cfg	Файл конфигурации	Конфигурация
Project1.dof	Файл параметров проекта	Текущие установки проекта
Project1.res	Файл ресурсов	Содержит пиктограммы, версию и т. д.
Unit1.pas	Программный модуль для Form1	Определяет функциональность формы
Unit1.dcu	Объектный файл для Unit1.pas	Откомпилированная версия Unit1.pas
Unit1.dfm	Файл формы №1	Список свойств компонентов формы
Unit2.pas	Программный модуль для Form2	Определяет функциональность формы
Unit2.dcu	Объектный файл для Unit2.pas	Откомпилированная версия Unit2.pas
Unit2.dfm	Файл формы №2	Список свойств компонентов формы
Unit3.pas	Программный модуль для Form3	Определяет функциональность формы
Unit3.dcu	Объектный файл для Unit3.pas	Откомпилированная версия Unit3.pas
Unit3.dfm	Файл формы №3	Список свойств компонентов формы



2.3 Текст программы

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Grids, StdCtrls, Menus;

type

TForm1 = class(TForm)

Label1: TLabel;

MainMenu1: TMainMenu;

N1: TMenuItem;

N2: TMenuItem;

N5: TMenuItem;

N6: TMenuItem;

N7: TMenuItem;

N8: TMenuItem;

N9: TMenuItem;

StringGrid1: TStringGrid;

procedure FormCreate(Sender:TObject);

procedure N2Click(Sender: TObject);

procedure N7Click(Sender: TObject);

procedure N8Click(Sender: TObject);

procedure N9Click(Sender: TObject);

procedure N6Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

type OK = record // структура типа OK

pn:string;

nr:string;

fio:string;

dv:string;

end;

var

Form1: TForm1;

p:OK;

OK1:array[1..10] of OK;

f,f1:textfile;

i,j:integer;

implementation

uses Unit2, Unit3;

{$R *.dfm}

procedure TForm1.FormCreate(Sender:TObject); // формирование формы при запуске программы

var a,b,c,d:string;

begin

assignfile(f1,'OK1.txt');

reset(f1);

stringgrid1.FixedCols:=0;

stringgrid1.ColCount:=4;

stringgrid1.RowCount:=11;

stringgrid1.Cells[0,0]:='пункт назначения';

stringgrid1.Cells[1,0]:='номер рейса';

stringgrid1.Cells[2,0]:='фамилия и.о. пассажира';

stringgrid1.Cells[3,0]:='желаемая дата вылета' ;

for i:=1 to 10 do

for j:=0 to 4 do

if stringgrid1.Cells[i,j]=''then N5.Visible:=false

else N5.Visible:=true;

end;

procedure TForm1.N2Click(Sender: TObject); // открытие формы Ввод данных

begin

form2.Show;

end;

procedure TForm1.N8Click(Sender: TObject); // пункт главного "очистка таблицы"

begin

for i:=1 to 10 do

begin

stringgrid1.Cells[0,i]:='';

stringgrid1.Cells[1,i]:='';

stringgrid1.Cells[2,i]:='';

stringgrid1.Cells[3,i]:='';

end;

end;

procedure TForm1.N6Click(Sender: TObject); // пункт главного меню "по номеру рейса"

var a,b,c,f,d:string;

v:integer;

begin

v:=0;

for i:=1 to 10 do

begin

OK1[i].pn:= stringgrid1.Cells[0,i];

OK1[i].nr:= stringgrid1.Cells[1,i];

OK1[i].fio:= stringgrid1.Cells[2,i];

OK1[i].dv:= stringgrid1.Cells[3,i];

end;

d:=InputBox('Ввод искомого значения','Введите номер рейса','0');

form3.label1.Caption:='найден следующий рейс '+d;

for i:=1 to 10 do begin

if OK1[i].nr=d

then

begin

a:=' '+OK1[i].fio+ ' дата вылета '+OK1[i].dv;

form3.Memo1.Lines.Add(a);

v:=v+1;

end;

end;

if v=0 then messagedlg(' номера рейса '+d+' нет' ,mtinformation,[mbok],0);

form3.Show;

end;

procedure TForm1.N7Click(Sender: TObject); // пункт главного меню "по дате вылета"

var a,b,c,d,f: string;

v:integer;

begin

v:=0;

for i:=1 to 10 do

begin

OK1[i].pn:= stringgrid1.Cells[0,i];

OK1[i].nr:= stringgrid1.Cells[1,i];

OK1[i].fio:= stringgrid1.Cells[2,i];

OK1[i].dv:= stringgrid1.Cells[3,i];

end;

f:=InputBox('Ввод искомого значения','Введите дату вылета','0');

form3.label1.Caption:=' дата вылета '+f;

for i:=1 to 10 do begin

if OK1[i].dv=f

then

begin

a:=OK1[i].fio+ ' номер рейса '+OK1[i].nr;

form3.Memo1.Lines.Add(a);

v:=v+1

end;

end;

if v=0 then messagedlg(' дата вылета '+f+' нет' ,mtinformation,[mbok],0);

form3.Show;

end;

procedure TForm1.N9Click(Sender: TObject); //пункт главного меню "Выход"

begin

form1.Close;

end;

end.

unit Unit2;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, Grids;

type

TForm2 = class(TForm)

StringGrid1: TStringGrid;

Label1: TLabel;

Button1: TButton;

Button2: TButton;

Button3: TButton;

procedure Button2Click(Sender:TObject);

procedure Button1Click(Sender:TObject);

procedure FormCreate(Sender:TObject);

procedure StringGrid1KeyPress(Sender:TObject;var Key:Char);

procedure Button3Click(Sender:TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

type OK = record

pn,nr,fio,dv:string;

end;

var

Form2: TForm2;

p:OK;

OK1:array[1..10] of OK;

F,F1:textfile;

i,j:integer;

implementation

uses Unit1, Unit3;

{$R *.dfm}

procedure TForm2.StringGrid1KeyPress(Sender:TObject;var Key:Char); //контроль ввода данных

begin

for i:=1 to 10 do

case key of

#8,'.',' ','0'..'9','а'..'я','А'..'Я':;

#13:

if stringGrid1.Col<stringgrid1.ColCount-1

then

stringgrid1.Col:=stringgrid1.Col+1;

else begin

key:=chr(0);

messagedlg('некорректный ввод данных',mtinformation,[mbok],0)

end;

end;

end;

procedure TForm2.FormCreate(Sender:TObject);

var a,b,c,d:string;

begin

assignfile(f1,'OK1.txt');

reset(f1);

stringgrid1.FixedCols:=0;

stringgrid1.ColCount:=4;

stringgrid1.RowCount:=11;

stringgrid1.Cells[0,0]:='пункт назначения';

stringgrid1.Cells[1,0]:='номер рейса';

stringgrid1.Cells[2,0]:='фамилия и.о.';

stringgrid1.Cells[3,0]:='дата вылета';

i:=1;

while not eof (f1) do

begin

readln(f1,a);

OK1[i].pn:=a;

readln(f1,b);

OK1[i].nr:=b;

readln(f1,c);

OK1[i].fio:=c;

readln(f1,d);

OK1[i].dv:=d;

i:=i+1;

end;

begin

stringgrid1.Cells[0,i]:=OK1[i].pn;

stringgrid1.Cells[1,i]:=OK1[i].nr;

stringgrid1.Cells[2,i]:=OK1[i].fio;

stringgrid1.Cells[3,i]:=OK1[i].dv;

end;

end;

procedure TForm2.Button1Click(Sender: TObject); //Нажатие кнопки "Записать данные"

var a,b,c,d:string;

z:OK;

begin

assignfile(f,'OK.txt');

rewrite(f);

for i:=1 to 10 do

begin

OK1[i].pn:=stringgrid1.Cells[0,i];

OK1[i].nr:=stringgrid1.Cells[1,i];

OK1[i].fio:=stringgrid1.Cells[2,i];

OK1[i].dv:=stringgrid1.Cells[3,i];

end;

for i:=1 to 10-1 do //сортировка массива по алфавиту

for j:=1 to 10-i do

if OK1[j].fio> OK1[j+1].fio

then

begin

z:=OK1[i];

OK1[i]:=OK1[i+1];

OK1[i+1]:=z;

end;

for i:=1 to 10 do

begin

form1.stringgrid1.Cells[0,i]:=OK1[i].pn;

form1.stringgrid1.Cells[1,i]:=OK1[i].nr;

form1.stringgrid1.Cells[2,i]:=OK1[i].fio;

form1.stringgrid1.Cells[3,i]:=OK1[i].dv;

a:=OK1[i].pn;

b:=OK1[i].nr;

c:=OK1[i].fio;

d:=OK1[i].dv;

writeln(f,a);

writeln(f,b);

writeln(f,c);

writeln(f,d);

end;

closefile(f);

form2.Close;

form1.Show;

form1.N5.Visible:=true;

end;

procedure TForm2.Button2Click(Sender:TObject); //Нажатие кнопки "Закрыть"

begin

form1.Show;

form2.Close;

end;

procedure TForm2.Button3Click(Sender:TObject); //Нажатие кнопки "Очистить таблицу"

begin

for i:=1 to 10 do

begin

stringgrid1.Cells[0,i]:='';

stringgrid1.Cells[1,i]:='';

stringgrid1.Cells[2,i]:='';

stringgrid1.Cells[3,i]:='';

end;

end;

end.

unit Unit3;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm3 = class(TForm)

Label1:TLabel;

Button1:TButton;

Memo1: TMemo;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form3: TForm3;

implementation

uses Unit1, Unit2;

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject); //Закрытие формы "Результат поиска"

begin

form1.Show;

form3.Close;

end;

end.

2.4 Описание программы

Согласно ГОСТ 19.402-78 раздел должен содержать следующие подразделы:

общие сведения;

функциональное назначение;

описание логической структуры;

используемые технические средства;

вызов и загрузка;

входные данные;

выходные данные.

Общие сведения.

Разработанное приложение является автоматизированной информационной системой и называется «Бронирование авиабилетов». Программа разработана в среде BorlandDelphi на языке ObjectPascal.

Функциональное назначение.

Программа предназначена для хранения и обработки информации о бронировании авиабилетов.

Используемые технические средства.

Для стабильной работы данной программы требуются следующие технические и программные средства:

· Windows 9x/ME/NT/2000/XP.

· Видео память не менее 1Mb.

· Оперативной памяти не менее 16 Mb.

· Процессор IntelPentium 166 и выше.

· Объем свободного места на жестком диске не менее 500 Мб.

· Манипуляторы: клавиатура и мышь.

Вызов и загрузка.

Программа запускается на исполнение либо двойным щелчком левой кнопки мыши по файлу Бронирование авиабилетов.exe в проводнике Windows, либо нажатием правой кнопки мыши по указанному файлу и выбором пункта меню "Открыть".

Входные данные.

В программе были использованы входные данные текстового и числового типа:

Существует два способа ввода этих данных в программу:

- прямая загрузка с клавиатуры;

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

Выходные данные.

Представляют собой текстовую информацию, выводимую на экран монитора.

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

Программный продукт разработан в BorlandDelphi с использованием программных модулей стандартных модулей библиотек Delphi.

Для отладки программного продукта используются встроенные средства система программирования.

Проверки подлежат следующие требования к программному продукту:

· Обеспечивать первоначальный ввод данных в информационную систему и формировать линейный список;

· Производить вывод всего списка;

· При вводе номера рейса выводить все данные об этом рейсе;

· При вводе даты вылета выводить данные обо всех рейсах, вылетающих в этот день;

Осуществляет вывод данных:

· Пункт назначения;

· Номер рейса;

· Фамилия И.О.пассажира;

· Дата вылета.

Для тестирования программного продукта применялись исходные данные записанные в BronirovanieAviabiletov.txt.



3.Оценка программы

В данном параграфе проводится оценка созданного программного продукта.

Затраты на создание программного продукта складываются из расходов по оплате труда разработчика программы и расходов по оплате машинного времени при отладке программы:

где

З_СПП - затраты на создание программного продукта;

- затраты на оплату труда разработчика программы;

- затраты на оплату машинного времени;

- общие затраты

3.1 Расходы на оплату труда разработчика программы

Расходов на оплату труда разработчика программы определяются путем умножения трудоемкости создания программного продукта на среднюю часовую оплату программиста (с учетом коэффициента отчислений на социальные нужды):

3.2 Расчет трудоемкости создания программного продукта

Трудоемкость разработки программного продукта можно определить следующим образом:



t=t_О + t_А + t_Б + t_П + t_Д + t_ОТ

t_О-затраты труда на подготовку описания задачи;

t_А - затраты труда на разработку алгоритма решения задачи;

t_Б - затраты труда на разработку блок-схемы алгоритма решения задачи;

t_П - затраты труда на составление программы по готовой блок-схеме;

t_Д - затраты труда на подготовку документации задачи;

t_ОТ - затраты труда на отладку программы на ПК при комплексной отладке задачи;

составляющие затрат, в свою очередь можно вычислить через условное число операторов Q. Например, в нашем случае число операторов в отлаженной программе Q=290.

3.3 Расчет затрат труда на подготовку описания

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

Где

В - коэффициент увеличения затрат труда вследствие недостаточного описания задачи, уточнений и некоторой не доработки, В=1, 2, … 5;

К - коэффициент квалификации разработчика, для работающих до 2 лет К=0,8;

В связи с тем, что при изучении описания данной задачи потребовалось много уточнений и доработок в описании коэффициент В принимаем равным 4.

Таким образом, получим:

3.4.Расчет затрат труда на разработку алгоритма

Затраты труда на разработку алгоритма решения задачи:

3.5 Расчет затрат труда на разработку блок-схемы

Затраты на разработку блок-схемы алгоритма решения задачи вычислим следующим образом:

3.6 Расчет затрат труда на составление программы

Затраты труда на составление программы по готовой блок-схеме вычислим по формуле:



3.7 Расчет затрат труда на отладку программы

Затраты труда на отладку программы на ПК при комплексной отладке задачи:

где

- затраты труда на отладку программы на ПК при автономной отладке одной задачи;

Отсюда

3.8 Расчет затрат труда на подготовку документации

Затраты труда на подготовку документации по задаче определяются:

t_д = t_ДР + t_ДО

t_ДР - затраты труда на подготовку материалов рукописи;

t_ДО - затраты на редактирование, печать и оформление документации.

;



Отсюда

t_д = 1,81+1,36=3,171 (чел/час).

Итак, общую трудоемкость программного продукта можем рассчитать:

t=18,125+5,178+5,178+5,178+12,082+3,171=48,912 (чел/час).

3.9 Расчет средней зарплаты программиста

Средняя зарплата программиста в современных рыночных условиях может варьироваться в широком диапазоне. Для примера возьмем среднюю часовую оплату труда, которая составляет Т_час =500руб/час, что составляет 88 000 руб/мес при 8-ми часовом рабочем дне и 5-ти дневной рабочей неделе. Вы должны взять примерную зарплату на данный момент в городе.

Затраты на оплату труда программиста состоят из зарплаты программиста и отчислений на социальные нужды. Отчисления на социальные нужды включают в себя:

· пенсионный фонд (29%),

· медстрах (3,6%),

· соцстрах (5,4%),

· фонд занятости (1,5%),

· сбор на образование (1%).

Итого отчисления на социальные нужды составляют 40,5%. Отсюда затраты на оплату труда программиста составляют:



3.10 Затраты на оплату машинного времени

Затраты на оплату машинного времени при отладке программы определяются путем умножения фактического времени отладки программы на цену машино-часа арендного времени:

где

- цена машино-часа арендного времени, руб/час;

- фактическое время отладки программы на ПК.

3.11 Расчет фактического времени отладки

Фактическое время отладки вычислим по формуле:

t_эвм=t_П + t_ДО + t_ОТ

t_эвм= 71,43+18,75+166,67=256,85 часа

3.12 Расчет цены машино-часа

Цену машино-часа найдем по формуле:

где

- полные затраты на эксплуатацию ПК в течении года;

- действительный годовой фонд времени ПК, час/год.



3.13 Расчет годового фонда времени работы

Общее количество дней в году - 365.

Число праздничных и выходных дней - 119.

Время простоя в профилактических работах определяется как еженедельная профилактика по 4 часа.

Итого годовой фонд рабочего времени ПК составляет:

.

3.14 Расчет полных затрат на эксплуатацию ПК

Полные затраты на эксплуатацию ПК можно определить по формуле:

где

- годовые издержки на заработную плату обслуживающего персонала, руб/год;

- годовые издержки на амортизацию, руб/год;

- годовые издержки на электроэнергию, потребляемую ПК, руб/год;

- годовые издержки на вспомогательные материалы, руб/год;

- затраты на текущий ремонт ПК, руб/год;

- годовые издержки на прочие и накладные расходы, руб/год.



3.15 Амортизационные отчисления

Сумма годовых амортизационных отчислений определяется по формуле:

где

- балансовая стоимость ПК, руб/шт;

- норма амортизации, %

Согласно постановления совета министров СССР от 22 октября 1990 года № 1072 «О единых нормах амортизационных отчислений на полное восстановление основных фондов народного хозяйства СССР» .

Балансовая стоимость ПК включает отпускную цену, расходы на транспортировку, монтаж оборудования и его наладку:

где

- рыночная стоимость компьютера, руб/шт,

- затраты на доставку и установку компьютера, руб/шт.

Компьютер, на котором велась работа, был приобретен по=9000 руб., (вставить свои данные) затраты на установку и наладку составили примерно 10% от стоимости компьютера:

=10%*=0,1*9000=900 руб.

Отсюда



3.16 Расчет затрат на электроэнергию

Стоимость электроэнергии, потребляемой за год, определяется по формуле:

З_ЭЛ = Р_ЗЛ * Т_эвм * С_ЭЛ * А,

Т_ЭВМ - суммарная мощность ПК;

С_ЭЛ - стоимость 1кВт*ч электроэнергии;

А - коэффициент интенсивного использования мощности машины.

Согласно техническому паспорту ПК Р_эвм =0,22 кВт, стоимость 1 кВт*ч электроэнергии для предприятий С_ЭЛ =0,548 руб, интенсивность использования машины А=0,98.

Тогда расчетное значение затрат на электроэнергию:

З_ЭЛ=0,22*1760*0,548*0,98=207,94 руб.

3.17 Расчет затрат на текущий момент

Затраты на текущий и профилактический ремонт принимаются равными 5% от стоимости ПК:

=0,05*=0,05*9900=495 руб.



3.18 Расчет затрат на вспомогательные материалы

Затраты на материалы, необходимые для обеспечения нормальной работы ПК составляют около 1% от стоимости ПК:

.

3.19 Прочие затраты по эксплуатации ПК

Издержки на заработную плату обслуживающего персонала складываются из основной заработной платы, дополнительной отчислений на заработную плату:

Сумма основной заработной платы определяется исходя из общей численности работающих в штате:

где

- тарифная ставка i-го работника в месяц, руб.;

В штат обслуживающего персонала должны входить инженер-электронщик с месячным окладом 1000 руб и электрослесарь с окладом 500 руб.

Тогда, учитывая, что данный персонал обслуживает 10 машин, имеем издержки на основную заработную плату обслуживающего персонала составят:



Сумма дополнительной заработной платы составляет 60% от основной заработной платы:

Сумма отчислений на социальные нужды составляет 40,5% от суммы дополнительной и основной заработных плат:

Тогда годовые издержки на заработную плату обслуживающего персонала составят:

Полные затраты на эксплуатацию ПК в течение года составят:

Тогда цена машино-часа арендуемого времени составит:

А затраты на оплату машинного времени составят:



Расчет общих расходов

Общие расходы это расходы на освещение, отопление, коммунальные услуги и т. п. Они принимаются равными одной трети основной зарплате разработчика программы, т. е. 2249,03 руб.

Тогда затраты на создание программного продукта составят:

Таблица 2

Q									tд
290									3,171

Таблица3

t	Тчас						Рэвм	СЭЛ	А
48,912	500			900			0,22	0,548	0,98.

Таблица 4

ЗЭЛ
207,94	495

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



Заключение

В рамках курсового проекта по дисциплине «Технология разработки программных продуктов» была разработана автоматизированная информационная система «Бронирование авиабилетов» . Для разработки приложения использовалась интегрированная среда разработки Delphi. Программное приложение состоит из (количество модулей, процедур, форм), включает в себя базу данных реализованную через систему файлов.

Тестирование и отладка приложения реализовывались средствами интегрированной среды Delphi.

В результате расчета затраты на создание данного программного продукта составили руб.,из которой заработная плата программиста составляет 34 360,68,при условии час работы составляет 500 руб./час

В ходе создания приложения возникали следующие сложности создания в сохранении, группировки форм, в написании самого кода.

Была рассмотрена литература или интернет источники по темам:

1.Delphiи Pascal. Библиотека I2R. Программирование на Delphi.

2.Палитра компонентов Delphi -- описание стандартных компонентов Delphi-FAQ.

3.Delphi свойства формы.



Литература

1. Аляев Ю.А. Алгоритмизация и языки программирования Pascal, C++, VisualBasic: учебно-справочное пособие. - М.: Финансы и статистика, 2007.

2. Епанешников А., Епанешников В. Программирование в среде TurboPascal 7.0. -М.:»ДИАЛОГ-МИФИ», 2010

3. Немнюгин С.А. TurboPascal: практикум - СПб: Питер, 2008.

4. Шень А. Программирование: теоремы и задачи. Учебное пособие. - М:МЦ НМО, 2007

5. Фалина И.Н., Богомолова Т.С., Большакова Е.А., Гущин И.С., Шухардина В.А. Алгоритмизация и программирование. - М.: КУДИЦ-ПРЕСС, 2007.

6. Павловская Т.А. С++. Программирование на языке высокого уровня. Учебник. - СПб: Питер, 2008-461с.

7. Павловская Т.А. Щупак Ю.А. С++. Программирование на языке высокого уровня. Практикум. - СПб: Питер, 2007-238с.

8. Delphi и Pascal. Библиотека I2R. Программирование на Delphi.

9. Палитра компонентов Delphi -- описание стандартных компонентов Delphi-FAQ.

10. Delphi свойства формы.

Размещено на Allbest.ru