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

ФЕДЕРАЛЬНОЕАГЕНТСТВО ПО ОБРАЗОВАНИЮ РФ

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

среднегопрофессионального образования

КУБАНСКИЙГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

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

ЭКОНОМИЧЕСКАЯ ИНТЕРПРЕТАЦИЯ РЕШЕНИЯЗАДАЧ ЛИНЕЙНОГО ПРОГРАММИРОВАНИЯ

Работу выполнил

П.Н. Байрачный

Специальность

«Программное обеспечениеВТ и АС»

Научный руководительпреподаватель

 С.В. Гончаров

ст. Павловская 2009 г.

КУБАНСКИЙГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТЗАДАНИЕ

накурсовое проектирование

 

Студенту 4 п  Байрачному Павлу Николаевичу

Тема работы: “Разработка программного продукта наязыке высокого уровня”.

Содержание задания:

Составить программу,которая для выбираемой единицы измерения (километры в час, мили в час или узлы)и для задаваемого значения скорости в этой единице измерения, выводит значениескорости в других единицах измерения.

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

1 морская миля = 1.852километра.

1 узел – это 1 морскаямиля в час.

1 миля (сухопутная) =1.609 километра.

 

 

Руководитель работы_ _ _ _ _ _ _ _ _ _ _ _ _ _ _  С.В.Гончаров

Задание принял студент_ _ _ __ _ _ _ _ _ _ _ _ __ П.Н Барачный

Павловская 2009 г.  

 

Задание

на курсовую работу студента группы 4ПСПО

Вариант №30.

Составить программу,которая для выбираемой единицы измерения (километры в час, мили в час или узлы)и для задаваемого значения скорости в этой единице измерения, выводит значениескорости в других единицах измерения.

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

1 морская миля = 1.852километра.

1 узел – это 1 морскаямиля в час.

1 миля (сухопутная) =1.609 километра.

Принял:_________________________

“____”“___________________”  2008г.

Подпись _________________

Оглавление

Введение. 2

Основная часть. 5

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

Системные требования. 5

Разработка программного продукта. 6

Блок схема программы… 6

Блок схема. 7

Проектирование. 8

Написаниепрограммы… 9

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

Сопровождение. 12

Список использованной литературы… 14

Введение

Среда Delphi — этосложный механизм, обеспечивающий высокоэффективную работу программиста.Визуально она реализуется несколькими одновременно раскрытыми на экране окнами.Окна могут перемещаться по экрану, частично или полностью перекрывая другдруга, что обычно вызывает у пользователя, привыкшего к относительной“строгости” среды текстового процессора Word или табличного процессора Excel,ощущение некоторого дискомфорта. После приобретения опыта работы с Delphi этоощущение пройдет, и вы научитесь быстро отыскивать нужное окно, чтобы изменитьте или иные функциональные свойства создаваемой вами программы, ибо каждое окнонесет в себе некоторую функциональность, т. е. предназначено для решенияопределенных задач.

Запустите Delphi — и выувидите нечто, похожее на рис. 2.1 (на рисунке показаны окна Delphi версии 6;для других версий окна могут иметь незначительные отличия). На нем изображенышесть наиболее важных окон Delphi: главное окно 1, окно Дерева объектов (ObjectTree View) 2, окно Инспектора объектов 3, окно браузера 4, окно формы 5 и окнокода программы 6.

Чтобы упорядочить окнатак, как они показаны на рисунке, вам придется вручную изменять их положение иразмеры, т. к. обычно окно кода программы почти полностью перекрыто окномформы. Впрочем, добиваться максимального сходства того, что вы видите на экраневашего ПК, с изображением, показанным на рис. 2.1, вовсе не обязательно:расположение и размеры окон никак не влияют на их функциональность; если вы невидите на экране окна кода, но хотите его увидеть, просто нажмите клавишу F12 [Еслик этому моменту активным было окно Инспектора Объектов, вам придется нажать наF12 еще раз.]. Повторное нажатие F12 вновь активизирует окно формы и т. д.- эта клавиша работает как двоичный переключатель, попеременно показывая окноформы или окно кода программы.

Замечу, что при первомзапуске Delphi поверх всех окон появится окно, показанное на рис. 2.2.

/>

Рис. 2.1.Наиболее важные окна Delphi:

/>

Рис. 2.2.Окно связи с Inprise (Borland)

 

С помощью этого окна вы сможетеполучить доступ к Web-страницам корпорации Inprise для просмотра самой свежейинформации о корпорации и ее программных продуктах, копирования дополни тельныхфайлов, чтения ответов на наиболее часто задаваемые вопросы и т. д. Приповторных запусках Delphi это окно появляется автоматически с некоторойпериодичностью, определяемой настройками на странице окна Tolls | EnvironmentOptions, связанной с закладкой Delphi Direct. Вы также сможете его вызвать влюбой момент с помощью опции Help | Delphi Direct главного меню.

Основная часть

 

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

Составить программу, котораявыводит для выбираемой единицы измерения (километры в час, мили в час или узлы)значение скорости в других единицах измерения.

Программабудет написана на Delphi 7 — среде разработки программ. При решении задачивоспользуемся стандартными функция выбранного языка программирования, которыеиспользуются для выполнения часто встречающихся вычислений и преобразований,которые язык Delphi предоставляет программисту.

Событие OnClick используется для выполнения расчетови OnKeyPress – событие нажатия клавиш наклавиатуре.

Системныетребования

Программный продуктпомещается на дискету. Его размер 395Kb.

Производим системныйанализ, который даёт возможность:

1.      Определитьфункции и характеристики программного продукта.

2.      Обозначитьинтерфейс продукта с другими системными элементами.

3.      Определитьпроектные ограничения программного продукта.

4.      Построить модели:процесса, данных, режимов функционирования продукта.

5.      Создать такиеформы представления информации и функций системы, которые можно использовать входе проектирования.

Данный программныйпродукт работает с операционными системами такими как: Windows  98/2000/ME/XP.Этот программный продукт может работать как на слабых машинах, так и на сильныхтак как у него слабые системные требования. Программный продукт оперируетстроковыми и числовыми  вычислениями. Интерфейс программного продукта выполнентолько под операционную систему Windows и будет работать в ней и в другихоперационных системах, совместимых с ней. При загрузке его на другой платформеили несовместимой с Windows он не будет работать.

Разработкапрограммного продукта

 

Блок схемапрограммы

 

В своей блок-схеме, дляповышения наглядности я решил использовать следующие типы блоков:

1.  Операция начала и конца алгоритма

/>

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

/>

     

3.  Оператор действия

/>

               

Блок схема

/> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> /> <td/> /> /> <td/> /> /> /> /> /> /> /> /> /> /> /> /> /> <td/> /> <td/> <td/> /> />

/>/>/>/>                        

/> /> /> /> /> /> /> /> <td/> />

Структура данных

Проектирование

Основные задачи

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

Интерфейс

Интерфейс программывыполнен в виде окна с функциональной кнопкой «Найти 1-й членпоследовательности».

 

/>

Рис.1. Интерфейс программы

 
Написаниепрограммы

 

unit Unit1;

 

interface

 

uses

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

  Dialogs,StdCtrls;

 

type

  TForm1 =class(TForm)

    name:TLabel;

    Edit1:TEdit;

    edinica1:TLabel;

    Button1:TButton;

    otvet1:TLabel;

    Edit2:TEdit;

    edinica2:TLabel;

    Button2:TButton;

    otvet2:TLabel;

    Edit3:TEdit;

    edinica3:TLabel;

    Button3:TButton;

    otvet3:TLabel;

    Edit4:TEdit;

    edinica:TLabel;

    Button4:TButton;

    otvet4:TLabel;

    procedureButton1Click(Sender: TObject);

    procedureButton2Click(Sender: TObject);

    procedureButton3Click(Sender: TObject);

    procedureButton4Click(Sender: TObject);

  private

    { Privatedeclarations }

  public

    { Publicdeclarations }

  end;

 

var

  Form1:TForm1;

 

implementation

{$R *.dfm}

 // первыйперевод

procedureTForm1.Button1Click(Sender: TObject);

var

a: real; // узлы в час

b: real; // км в час

begin

 form1.otvet1.Caption:='';

   try // возможна ошибка, если в поле

       // Edit1 будетнечисло

a:=StrToFloat(Edit1.Text);

b:=a*1.852;

otvet1.caption:=Edit1.text+'узел/ч=' +

FloatToStrF(b,ffGeneral,4,2)+'км/ч';

except

onEConvertError do // ошибкапреобразования

begin

ShowMessage('Ошибка!');

form1.Edit1.SetFocus;// курсорвполеввода

end;

end;

end;

procedureTForm1.Button2Click(Sender: TObject);

var

c: real; // мили в час

d: real; // км в час

begin

 form1.otvet2.Caption:='';

   try // возможна ошибка,если в поле

       // Edit2 будетнечисло

c:=StrToFloat(Edit2.Text);

d:=c*1.609;

otvet2.caption:=Edit2.text+'миль/ч=' +

FloatToStrF(d,ffGeneral,4,2)+'км/ч';

except

onEConvertError do // ошибкапреобразования

begin

ShowMessage('Ошибка!');

form1.Edit2.SetFocus;// курсорвполеввода

end;

end;

end;

procedureTForm1.Button3Click(Sender: TObject);

var

e: real; // км в час

m: real; // узлы в час

begin

 form1.otvet3.Caption:='';

   try // возможна ошибка,если в поле

       // Edit3 будетнечисло

e:=StrToFloat(Edit3.Text);

m:=e/1.852;

otvet3.caption:=Edit3.text+'км/ч=' +

FloatToStrF(m,ffGeneral,4,2)+'узлы/ч';

except

onEConvertError do // ошибкапреобразования

begin

ShowMessage('Ошибка!');

form1.Edit3.SetFocus;// курсорвполеввода

end;

end;

end;

 

procedureTForm1.Button4Click(Sender: TObject);

 var

p: real; // км в час

l: real; // узлы в час

begin

 form1.otvet4.Caption:='';

   try // возможна ошибка,если в поле

       // Edit4 будетнечисло

p:=StrToFloat(Edit4.Text);

l:=p/1.609;

otvet4.caption:=Edit4.text+'км/ч=' +

FloatToStrF(l,ffGeneral,4,2)+'мили/ч';

except

onEConvertError do // ошибкапреобразования

begin

ShowMessage('Ошибка!');

form1.Edit4.SetFocus;// курсорвполеввода

end;

end;

end;

end.

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

 

Для тестирования япересчитал MS Excel значения заданные по условию, сравнил результатысвоих вычислений с данными, которые выдает программа, и оказалось все верно.

/>

Сопровождение

 

Работа в созданной мноюпрограмме не требует каких либо специфических навыков от пользователя.Достаточно запустить исполняемый файл Project1.exe. На экране монитора появится окно программыпредставленное на рисунке.№1. По нажатию на кнопку  «Найти 1-й членпоследовательности» появится результат.

Заключение

В заключение хочетсяотметить о важности проделанной работы. За период решения задачи курсовогопроекта я научился работе со стандартными функциями языка программирования Pascal, работе с циклами, условиями, выводом информации в среде программирования Borland Delphi и построению блок-схемы алгоритма работы программы.

Списокиспользованной литературы

1. Кэнту М. «Delphi7: Для профессионалов» :- Санкт-Питербург:2004

2. А.Я.Архангельский.«100 компонентов общего назначения Delphi»-М.: 2001

3. Курс лекций попредмету «Основы алгоритмизации и программирования»

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

5. В.Озеров «Советыпо Delphi»