Навигация:

Главная Случайная страница Обратная связь ТОП Интересно знать Избранные Новые материалы

Топ:

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

Когда производится ограждение поезда, остановившегося на перегоне: Во всех случаях немедленно должно быть ограждено место препятствия для движения поездов на смежном пути двухпутного...

Устройство и оснащение процедурного кабинета: Решающая роль в обеспечении правильного лечения пациентов отводится процедурной медсестре...

Интересное:

Как мы говорим и как мы слушаем: общение можно сравнить с огромным зонтиком, под которым скрыто все...

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

Наиболее распространенные виды рака: Раковая опухоль — это самостоятельное новообразование, которое может возникнуть и от повышенного давления...

Дисциплины:

Автоматизация Антропология Археология Архитектура Аудит Биология Бухгалтерия Военная наука Генетика География Геология Демография Журналистика Зоология Иностранные языки Информатика Искусство История Кинематография Компьютеризация Кораблестроение Кулинария Культура Лексикология Лингвистика Литература Логика Маркетинг Математика Машиностроение Медицина Менеджмент Металлургия Метрология Механика Музыкология Науковедение Образование Охрана Труда Педагогика Политология Правоотношение Предпринимательство Приборостроение Программирование Производство Промышленность Психология Радиосвязь Религия Риторика Социология Спорт Стандартизация Статистика Строительство Теология Технологии Торговля Транспорт Фармакология Физика Физиология Философия Финансы Химия Хозяйство Черчение Экология Экономика Электроника Энергетика Юриспунденкция

Составление программной документации.

2020-08-21

128

0.00 из 5.00 0 оценок

Заказать работу

Содержание

⇐ ПредыдущаяСтр 2 из 2

1) Общие сведения программного обеспечения

Программа должна работать на IBM совместимых компьютерах
Тип процессора Pentium-3 и выше
Объём ОЗУ 32Мб и более

2) Структура программы.

Программа состоит из: трёх форм, одного компонента Image, двух компонентов

RadioButton, шести компонентов Button, и десяти компонентов Label.

3) Сообщение системному программисту.

Имеются сообщения о ходе выполнения программы.

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

Составление эксплуатационной документации.

1) Общие сведения

Реализовать «Игру в спички». Дано N (N < 30) спичек. Пользователь и компьютер поочерёдно берут 2-3 спички. Проигрывает тот, кому остаётся 1 спичка или их не остаётся вообще.

2) Копируем папку с программой на жёсткий диск компьютера.

3) Запуск Открываем файл Project1. exe.

4) Инструкция по работе:

а. Вводим количество спичек

b. Выбираем количество изымаемых и нажимаем на кнопку «Ввод»

c. Нажимаем на кнопку «ход компьютера»

d. Игра заканчивается, когда остаётся 0-1 спичка.

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

Тестирование программного продукта.

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

Заключение

Я, Агишев Руслан Хамитович студент 3 курса группы 083 специальности230105.51 программное обеспечение средств вычислительной техники автоматизирование систем ФГОУ СПО «Ярославского автомеханического техникума», разработал отчетную программу в рамках практики на получение первичных профессиональных навыков.

Для реализации программы я использовал язык программирования Borland Delphi 7.0, так как данная среда является одной из ведущих систем программирования, используемых для разработки современных программных продуктов, и в первую очередь приложений операционной системы Windows. Система программирования Delphi позволяет значительно упростить процесс создания Windows – приложений, а так же резко повысить производительность труда программиста.

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

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

Список литературы

Бобровский С.И.

Б72 Delphi 7. Учебный курс.- СПб.: Питер, 2008.- 736с.: ил.

Кандзюба С.П., Громов В.Н.

К82 Delphi 6. Базы данных и приложение. Лекции и упражнения.- К.: Издательство «ДиаСофт», 2001.- 576 с.

Культин Н.Б.

К90 Delphi в задачах и примерах.- СПб.: БХВ- Петербург, 2004.- 288 с.: ил.

Веб сайт

Http://www.wikipedia.org/wiki/Delphi

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

Приложение

unit Unit1; //главная форма

interface

uses

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

Dialogs, ExtCtrls, StdCtrls, Menus;

type

TForm1 = class(TForm)

Label1: TLabel;

Edit1: TEdit;

RadioButton1: TRadioButton;

RadioButton2: TRadioButton;

Button1: TButton;

Button2: TButton;

Image1: TImage;

Button3: TButton;

Button4: TButton;

MainMenu1: TMainMenu;

N1: TMenuItem;

N2: TMenuItem;

N3: TMenuItem;

procedure Button3Click(Sender: TObject); // описание компонентов

procedure Edit1KeyPress(Sender: TObject; var Key: Char); // описание компонентов

procedure Button1Click(Sender: TObject); // описание компонентов

procedure Button2Click(Sender: TObject); // описание компонентов

procedure Button4Click(Sender: TObject); // описание компонентов

procedure N1Click(Sender: TObject); // описание компонентов

procedure N2Click(Sender: TObject); // описание компонентов

procedure N3Click(Sender: TObject); // описание компонентов

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1; n,m:integer;a:real; //описание глобальных переменных

implementation

uses Unit2, Unit3; //связь с формой 2 и формой 3

{$R *.dfm}

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

procedure TForm1.Button3Click(Sender: TObject); //запуск процедуры

begin // начало процедуры

if Edit1.text<>'' then begin //условие проверки заполнения поля Edit1

n:=strtoint(edit1.text); //присвоение переменной n

m:=30-n; //присвоение переменной m

image1.Width:=image1.Width-24*m; // присвоение компонента Image1

Button1.Visible:=true; // присвоение компонента Button1

end else showmessage('введите количество спичек'); //вывод сообщения

end; // конец процедуры

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); //запуск процедуры

begin // начало процедуры

if ((ord(key)>57) or (ord(key)<48)) and (ord(key)<>8) then //условие на ограниченный ввод данных

key:=chr(0);

end; // конец процедуры

procedure TForm1.Button1Click(Sender: TObject); // запуск процедуры

begin // начало процедуры

if (radiobutton1.checked=true) or (radiobutton2.checked=true) then begin //условие активности

//компонента radiobutton1 или radiobutton2

Button1.Visible:=false; //присвоение компонента Button1

Button2.Visible:=true; //присвоение компонента Button2

if radiobutton1.checked=true then begin //условие активности компонента radiobutton1

image1.Width:=image1.Width-48; n:=n-2; // присвоение компонента Image1

if n<=1 then showmessage('компьютер проиграл'); //условие

end;

if radiobutton2.checked=true then begin //условие активности компонента radiobutton2

image1.Width:=image1.Width-72; n:=n-3; // присвоение компонента Image1

if n<=1 then showmessage('компьютер проиграл'); //условие и вывод сообщения

end;

end

else showmessage('выбирите количество изымаемых спичек'); //вывод сообщения

end; // конец процедуры

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

procedure TForm1.Button2Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

Button2.Visible:=false; // присвоение компонента Button2

Button1.Visible:=true; // присвоение компонента Button1

randomize;

a:=random; // присвоение переменной а

if a<=0.5 then a:=2 //условие

else a:=3;

if a=2 then begin //условие значения переменной а

image1.Width:=image1.Width-48; n:=n-2; // присвоение компонента Image1

if n<=1 then showmessage('вы проиграли'); //условие и вывод сообщения

end;

if a=3 then begin //условие значения переменной а

image1.Width:=image1.Width-72; n:=n-3; // присвоение компонента Image1

if n<=1 then showmessage('вы проиграли'); //условие и вывод сообщения

end;

end; //конец процедуры

procedure TForm1.Button4Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

Edit1.Clear;

image1.Picture.LoadFromFile('Спича.bmp');

image1.Height:=49; image1.Width:=720; //размеры компонента image1

end; //конец процедуры

procedure TForm1.N1Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

form2.show; //переход на вторую форму

form1.Visible:=false; //закрытие первой формы

end; //конец процедуры

procedure TForm1.N2Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

form3.show; //переход на третью форму

form1.Visible:=false; //закрытие первой формы

end; //конец процедуры

procedure TForm1.N3Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

Close;

end;

end. //конец программы

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

unit Unit2; //форма «автор»

interface

uses

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

Dialogs, StdCtrls;

type

TForm2 = class(TForm)

Button1: TButton;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

procedure Button1Click(Sender: TObject); // описание компонентов

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

uses Unit1; //связь с формой 1

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

form1.show; //переход на первую форму

form2.Visible:=false //закрытие второй формы

end; //конец процедуры

end. //конец программы

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

unit Unit3; //форма «правила игры»

interface

uses

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

Dialogs, StdCtrls;

type

TForm3 = class(TForm)

Button1: TButton;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

procedure Button1Click(Sender: TObject); // описание компонентов

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form3: TForm3;

implementation

uses Unit1; //связь с формой 1

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject); //запуск процедуры

begin //начало процедуры

form1.show; //переход на первую форму

form3.Visible:=false //закрытие третей формы

end; //конец процедуры

end. //конец программы

ППН 230105.51.011.001.00 ПЗ

Лист

Изм. Лист № докум. Подпись Дата

⇐ Предыдущая 12

Поделиться с друзьями:

Биохимия спиртового брожения: Основу технологии получения пива составляет спиртовое брожение, - при котором сахар превращается...

Двойное оплодотворение у цветковых растений: Оплодотворение - это процесс слияния мужской и женской половых клеток с образованием зиготы...

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

Таксономические единицы (категории) растений: Каждая система классификации состоит из определённых соподчиненных друг другу...