Разработка и стандартизация программных средств информационных технологий (48559)

Посмотреть архив целиком

МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ

МОСКОВСКАЯ АКАДЕМИЯ ПРЕДПРИНИМАТЕЛЬСТВА

ПРИ ПРАВИТЕЛЬСТВЕ МОСКВЫ

Сургутский филиал









Контрольная работа

Разработка и стандартизация программных средств информационных технологий


Выполнил: Чернобровкин Виталий Викторович

Специальность: Прикладная информатика в экономике

Проверил: Анисимов Валерий Алексеевич









г. Сургут, 2009 г.


1. Техническое задание на объект автоматизации


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


Исполнительный файл (программа) написанная на высокоуровневом языке программирования “Delphi”, представляющая собой графический интерфейс в виде кнопочной формы.

Заказчик: Руководитель кафедры информационных технологий к. т. н. Анисимов В. А.

Разработчик: Чернобровкин Виталий Викторович студент 5-го курса МосАП, г Сургут.

Исполнительный файл (программа), разрабатывается согласно ГОСТ 34-602-89 ИТ.

Срок начало работы по созданию программы: 7.03.2009.

Окончание работы 21. 04. 2009

Порядок оформления и предъявления заказчику результатов работ по созданию системы (ее частей), по изготовлению и наладке: 1) демонстрация программы в приложении PowerPoint написанной с помощью ВЯП “Delphi”.


1.2 Назначение программы


Автоматизация приложения мини - СУБД. Автоматизированная выборка данных. Упрощение переработки информации при использовании СУБД. Так как, обработка бумажной документации в ручную долговременный и затратный труд.



1.3 Цель создания


Демонстрация знаний в изучении ВЯП “Delphi”, навыков в работе с данным языком программирования. Изучение и закрепление знаний в ЕСПД (ГОСТ 19.001-77 и т.д. по порядку)


1.4 Объекты автоматизации


АРМ секретаря учебно-методического кабинета. В программное обеспечение ПК секретаря входит Операционная система Windows XP Professional.


1.5 Требования к численности и квалификации персонала


Квалификация пользователей должна быть на уровне “уверенного пользователя”. Т.е. пользователь должен уверенно разбираться и работать в СУБД написанной на ВЯП “Delphi”.


1.6 Требования к защите информации


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


1.2 Требования к видам обеспечения


1.2.1 Лингвистическое обеспечение

Представляет собой языки программирования на которых пишется программа т.е. ВЯП – “Delphi”.


1.2.2 Информационное обеспечение

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

Информационный обмен между данными должен быть как последовательным, так и выборочным

Рекомендуемые технические средства и операционная система: ПЭВМ типа IBM PC и ОС Microsoft Windows. Рекомендуемая СУБД – “Delphi”


1.2.3 Программное обеспечение

Для разработки формы применялась программа написанная на ВЯП “Delphi”.


1.3 Состав и содержание работ


Таблица 2.1

п/п

Наименование работы

Результат работы

1

ТЭО

Обоснование и смысл разработки программы

2

Построение алгоритма

Основа написания программы

3

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

Основной листинг программы

4

Прогонка программы

Анализ и выявление ошибок

5

Отладка программы

Устранение синтаксических и семантических ошибок

6

Ввод в эксплуатацию

Работа с программой



2. Программа и методика испытаний


Согласно ЕСПД ГОСТ 19.301-79 содержит следующие разделы:


2.1 Объект испытаний


Программа – исполнительный файл, по сущности – графический интерфейс СУБД, кнопочная форма.


2.2 Цель испытаний


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


2.3 Требования к программе


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

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

Программа должна выводить информацию согласно введенным для нее требованиям.

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

Если в программе имеется особая или секретная информация, то она должна иметь код доступа (пароль). В данной программе таковой информации нет.


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


Состав и структура программного документа устанавливается по ГОСТ 19.105-78. Программный документ выполняют одним из следующих печатных способов:

машинописным - на одной стороне листа, через два интервала; допускается через один или полтора интервала, если обеспечивается пригодность к микрофильмированию по ГОСТ 13.102-72 (разд.1);

машинным - на одной стороне листа, с расстояниями между основаниями строк, обеспечивающим пригодность к микрофильмированию;

типографским - в соответствии с требованиями, предъявленными к изданиям, изготавливаемым типографским способом.


2.5 Состав и порядок испытаний


Структура и оформление документа устанавливается в соответствии с ГОСТ 19.105-78.

Для проведения испытаний (запуск, отладка, останов) программы был задействован ПК типа Pentium VI с операционной системой Windows XP.


3. Листинг прикладной программы


unit Unit1;

interface

uses

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

Dialogs, StdCtrls, Grids, ValEdit, CheckLst;

type

TForm1 = class(TForm)

Button1: TButton;

Memo1: TMemo;

Button2: TButton;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

const filename = 'students.txt'; {файл с исходными данными}

type

student_record = record {структура для хранения данных о студенте}

name: ShortString; {ФИО}

examen1: ShortString; {Балл за первый экзамен}

examen2: ShortString; {Балл за второй}

zachet: ShortString; {1- сдан зачет, 0-не сдан}

faculty: ShortString; {факультет}

profession: ShortString; {специальность}

end;

plan = record {структура для хранения данных о плане приема на специальности}

name: ShortString; {наименование специальности}

ball: word; {проходной балл на специальность}

students: array of student_record; {студенты, зачисленные на специальность}

end;

var

Form1: TForm1;

f: textfile;

student_kniga: array of student_record; {массив студентов(данные из файла)}

plans: array of plan;{план приема и зачисленные студенты}

implementation

{$R *.dfm}

{открытие и чтение файла данных}

procedure open_file;

var i, ii, t: word;

s: ShortString;

begin

AssignFile(f, filename);

Reset(f);

i:=1;

SetLength(student_kniga,0);

while not eof(f) do {в цикле считываем данные из файла в переменные}

begin

t:=0;

SetLength(student_kniga,i);

readln(f, s); {читаем построчно}

for ii:=1 to Length(s) do {перебираем посимвольно строку}

begin

if (s[ii] = '+') then t:=t+1{если встречаем символ-разделитель данных, переходим к считыванию следующей переменной}

else

if t=0 then

student_kniga[i-1].name:= student_kniga[i-1].name + s[ii] {запоминаем фамилию}

else

if t=1 then

student_kniga[i-1].examen1:= student_kniga[i-1].examen1 + s[ii] {запоминаем балл первого экзамена}

else

if t=2 then

student_kniga[i-1].examen2:= student_kniga[i-1].examen2 + s[ii] {запоминаем балл второго экзамена}

else

if t=3 then

student_kniga[i-1].zachet:= student_kniga[i-1].zachet + s[ii] {запоминаем результат зачета}

else

if t=4 then

student_kniga[i-1].faculty:= student_kniga[i-1].faculty + s[ii] {запоминаем факультет}

else

if t=5 then

student_kniga[i-1].profession:= student_kniga[i-1].profession + s[ii]; {запоминаем специальность}

end;

i:= i+1;

end;

closefile(f); {закрываем файл данных}

end;

{процедура отображения загруженных данных на форме}

procedure display;

var i: word;

begin

form1.Memo1.Clear; {очищаем окно вывода данных}

for i:=0 to length(student_kniga)-1 do {цикл по студентам}

begin

form1.Memo1.Lines.add(student_kniga[i].name {заносим данные о студенте в окно вывода}

+ #09 + student_kniga[i].examen1

+ #09 + student_kniga[i].examen2

+ #09 + student_kniga[i].zachet

+ #09 + student_kniga[i].faculty

+ #09 + student_kniga[i].profession);

end;

end;

{сохранение результатов вычислений}

procedure save_file;

var i, ii: word;

begin

for i:=0 to length(plans)-1 do {цикл по всем специальностям}


Случайные файлы

Файл
102118.rtf
22339-1.rtf
ЭУР.doc
91275.rtf
181364.rtf




Чтобы не видеть здесь видео-рекламу достаточно стать зарегистрированным пользователем.
Чтобы не видеть никакую рекламу на сайте, нужно стать VIP-пользователем.
Это можно сделать совершенно бесплатно. Читайте подробности тут.