Программа на языке программирования высокого уровня Borland Delphi 7.0
3.2 Описание основных алгоритмов работы программного обеспечения
Для составления программы, предназначенной для решения на ЭВМ какой-либо задачи, требуется составление алгоритма ее решения -- точного предписания, которое определяет процесс, ведущий от исходных данных к требуемому конечному результату.
Алгоритм - предписание, однозначно задающее процесс преобразования исходной информации в виде последовательности элементарных дискретных шагов, приводящих за конечное число их применений к результату.
Если вычислительный процесс заканчивается получением результатов, то говорят, что соответствующий алгоритм применим к рассматриваемой совокупности исходных данных. В противном случае говорят, что алгоритм неприменим к совокупности исходных данных. Любой применимый алгоритм обладает следующими основными свойствами:
дискретностью;
определенностью;
результативностью;
массовостью.
Дискретность - последовательное выполнение простых или ранее определённых (подпрограммы) шагов. Преобразование исходных данных в результат осуществляется дискретно во времени.
Определенность состоит в совпадении получаемых результатов независимо от пользователя и применяемых технических средств (однозначность толкования инструкций).
Результативность означает возможность получения результата после выполнения конечного количества операций.
Массовость заключается в возможности применения алгоритма к целому классу однотипных задач, различающихся конкретными значениями исходных данных (разработка в общем виде).
Для задания алгоритма необходимо описать следующие его элементы:
набор объектов, составляющих совокупность возможных исходных данных, промежуточных и конечных результатов;
правило начала;
правило непосредственной переработки информации (описание последовательности действий);
правило окончания;
правило извлечения результатов.
Основные способы задания алгоритмов: графический способ и описание алгоритма с помощью программы.
Графический способ описания алгоритма осуществляется с помощью блок схемы:
Рисунок 5 - блок схема программы
Описание алгоритмов с помощью кода программы.
Ниже представлена часть код основной формы программы с помощью которого осуществляются основные функции программного продукта.
procedure TMainForm.SetCaption;
begin
if Length(TodoFilename) = 0 then
MainForm.Caption := title
else
MainForm.Caption := title + - +
Lowercase(ExtractFilename(TodoFilename));
end;
procedure TMainForm.EnableMenu;
var
I: Integer;
begin
with FileMenu do
begin
for I := 0 to Count - 1 do { Enable all File commands }
Items[I].Enabled := True;
if not FileDirty then
begin {- No edits }
FileSave.Enabled := False; { Must use Save as }
if Length(TodoFilename) = 0 then { i.e. file not named }
begin {- No edits; no name }
FileSaveAs.Enabled := False; { Nothing to save }
FilePrint.Enabled := False; { Nothing to print }
end;
end;
end;
end;
procedure TMainForm.ReadFile;
begin
SrcList.Items.LoadFromFile(TodoFilename);
DstList.Items.LoadFromFile(DoneFilename);
FileDirty := False;
end;
procedure TMainForm.WriteFile;
begin
SrcList.Items.SaveToFile(TodoFilename);
DstList.Items.SaveToFile(DoneFilename);
FileDirty := False;
end;
procedure TMainForm.SaveAsFile;
begin
if FileSaveDialog.Execute then
begin
TodoFilename := FileSaveDialog.Filename;
DoneFilename := ChangeFileExt(TodoFilename, .Don);
WriteFile;
SetCaption;
end;
end;
procedure TMainForm.SaveFile;
begin
if FileDirty then
begin
if Length(TodoFilename) = 0 then
SaveAsFile
else
WriteFile;
end;
end;