Разработка алгоритма, схема алгоритма и его описание

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

Sg1.cells

Начало

1. процедура выполнения действий при загрузке формы: FormShow.

Пояснения к алгоритму 1:

Блок 2 – задание имен фиксированным столбцам в StringGrid.

memo1.Lines

Блок 3 – вывод в поле memo сообщения о запуске.

Начало

2. процедура очистки StringGrid: CleanSG.

n2=1, Sg1.Rowcount,1

2

Пояснения к алгоритму 2:

Sg1.rows[n2].clear

Блок 2 – цикл перемещения по строкам StringGrid.

Блок 3 – очистка строки StringGrid.

3. процедура очистки edit- ов: clearedit.

2

Пояснения к алгоритму 3:

edit1.clear

Блоки 2-6 – очистка edi t-ов.

4. процедура создания новой базы: button4click.

Пояснения к алгоритму 4:

Нет

Да

messagedlg

Блок 2 – запрос удаления несохраненных данных.

Блок 3 – вызов процедуры.

cleansg

Блок 4 – вывод в поле memo подтверждение создания базы.

5. процедура добавления записи: button1click.

Пояснения к алгоритму 5:

Блок 2 – проверка edit -ов на не пустые строки.

Блок 3 – попытка присвоить строке целочисленные переменные.

сообщение о необходимости полей 2…5 быть числом.

Блок 4 – задание начального условия цикла.

Блоки 5,6 – цикл очистки типового массива.

Блок 7 – задание начального условия цикла.

Блоки 8,9,10 – цикл перевода строки StringGrid в массив записей.

Блок 11 – задание начального условия цикла.

Блоки 12,13,14 – цикл нахождения количества записей больших добавленного значения.

Блок 13 – выполнение условия сравнения текстовых переменных.

Блоки 15,16 – междустрочное добавление записи в массив.

Блок 17 – вызов процедуры.

Блок 18 – задание начального условия цикла.

Блоки 19,20,21,22,23 – цикл перевода массива в StrinпGrid.

Блок 24 – вызов процедуры очистки edit -ов.

Блок 25 – вызов процедуры авторасчета.

сообщение о необходимости всех полей к обязательному заполнению.

6. процедура автоматического расчета: autorachet.

Пояснения к алгоритму 6:

Блок 2 – формирование цикла.

Блок 3 – условие математического расчета (при не пустой ячейке - выполняется).

Блок 4 – выполнение математических расчетов.

Блоки 5,6,7 – поиск максимального элемента.

Блок 8 – вывод в поле memo наименование статьи с наибольшим значением.

7. процедура сохранения базы: button6click.

Пояснения к алгоритму 7:

Блоки 2,3 – открытие для записи данных.

Блок 4 – задание начального условия цикла.

Блоки 5,6 – повторный цикл очистки массива.

Блок 7 – задание начального условия цикла.

Блоки 8,9,10 – повторение цикла перевода строки StringGrid в массив записей.

Блоки 11,12 – запись в файл.

Блок 13 – закрытие файла.

Блок 14 – вывод в поле memo подтверждения.

8. процедура открытия базы: button5click.

Пояснения к алгоритму 8:

Блоки 2,3 – открытие для чтения данных.

Блок 4 – задание начального условия цикла.

Блоки 5,6 – повторный цикл очистки массива.

Блоки 7,8,9 – чтение из типизированного файла в типизированный массив.

Блок 10 – вызов подтверждения очистки StringGrid.

Блок 11 – задание начального условия цикла.

Блоки 12,13,14,15,16 – повтор цикла перевода массива в StringGrid.

Блок 17 – вызов процедуры расчета.

Блок 18 – вывод в поле memo подтверждения.

9. процедура удаления базы: button3click.

Пояснения к алгоритму 9:

Блок 2 – очистка выбранной строки.

Блок 3 – задание начального условия цикла.

Блоки 4,5 – повторный цикл очистки массива.

Блок 6 – задание начального условия цикла.

Блоки 7,8,9 – повторение цикла перевода строки StrinGrid в массив записей.

Блок 10 – задание начального условия цикла.

Блоки 11,12,13,14,15 – повтор цикла перевода массива в StrinGrid.

Блок 16 – расчет.

10. клик StringGrid-а.

Пояснения к алгоритму 10:

Начало

Блок 2 – подтверждение выбора.

11. вызов печати.

Пояснения к алгоритму 11:

Начало

Блок 2 – вызов стандартного почтового клиента.

12. выход.

Пояснения к алгоритму 12:

Начало

Блок 2 – выход из программы.