Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Пособие Basic заочники.doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
1.35 Mб
Скачать

6. Последовательность разработки информационной технологии

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

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

Словесное описание. Вычислить высоту треугольника, если задана его площадь и известно, что основание треугольника больше его высоты на некоторую величину b.

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

Выходные данные:

h – высота треугольника (переменная вещественного типа).

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

Входные данные:

s – площадь треугольника;

b – величина, на которую основание больше высоты;

s и b – переменные вещественного типа.

6.2. Разработка математической модели

Математическая модель устанавливает связь между входными и выходными данными.

Известно, что s = 0,5h(h + b), отсюда 2s= h2 + bh.

Выполняя элементарные преобразования, получим:

h2 + bh – 2s = 0.

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

Для вычисления может быть использовано только значение , так как отрицательное значение h2 не имеет смысла.

Таким образом,

6.3. Составление схемы алгоритма

Для рассматриваемого примера схема алгоритма будет иметь вид:

6.4. Разработка проекта

Разработка проекта начинается с создания основной формы для приложения. Для этого форму перемещают в удобное место и подбирают ее размеры, передвигая границы, затем рисуют на ней нужные элементы управления, которые выбираются из панели элементов (Toolbox) и выводятся на форму. В правой части панели инструментов указывается точное положение и размер нового элемента управления.

Для рассматриваемого примера на форме можно разместить следующие элементы управления (рис. 10):

три надписи (комментарии к трем текстовым полям).

Название элементов управления – Label1, Label2, Label3. Щелкнем левой клавишей мыши на элементе управления "Надпись", перенесем его на форму, зададим свойство Caption, равное "Введите b". Еще раз щелкнем на элементе управления "Надпись", перенесем его на форму и зададим свойство Caption, равное "Введите s". Еще раз щелкнем на элементе управления "Надпись", перенесем его на форму, зададим свойство Caption, равное "Результат h";

три текстовых окна: для ввода значения s, для ввода значения b, для вывода результата h.

Рис. 10. Первоначальный вид формы

Щелкнем на элементе управления "Текст", перенесем его на форму, очистим свойство Text. Свойству Name этого поля автоматически присваивается имя Text1. Аналогично сформируем поля Text2 и Text3;

кнопку для запуска программы с именем Command1. Щелкнем на элементе управления "Кнопка", перенесем его на форму и в свойство Caption поместим текст "Счет" (рис. 11).

Рис. 11. Вид формы после определения свойств элементов управления

Примечания.

1. Если на форме надо разместить несколько элементов управления одного типа, которые, как ожидается, будут иметь одинаковые свойства, то сэкономить время можно следующим образом: вывести на форму объект, настроить его свойства, скопировать его в ClipBoard (буфер обмена), затем вставить его на форме соответствующее количество раз. В ответ на подсказку "You already have a control named <имя элемента управления>. Do you want to create a control array?" нажать кнопку "Нет".

2. Для отображения сетки на форме в меню Tools основного окна выбрать команду Options, на вкладке General включить флажок Show Grid.

После разработки формы необходимо перейти к записи програм-много кода. Чтобы открыть Редактор кода, надо дважды щелкнуть левой клавишей мыши по кнопке с надписью "Счет". Visual Basic автоматически выводит два оператора, которые определяют начало и конец процедуры.

Для рассматриваемого примера программный код может иметь вид:

  1. Private Sub Command1_Click()

  2. Dim b As Single, s As Single, h As Single

  3. b = Val(Text1.Text)

  4. s = Val(Text2.Text)

  5. h = (–b + Sqr(b^2 + 8*s))/2

  6. Text3.text = Str(h)

  7. End Sub

Первая строка определяет событие, которое нужно обработать.

Вторая строка объявляет переменные b, s, h как вещественные. В третьей строке переменной b присваивается значение, введенное в текстовое поле Text1. Функция Val() преобразует строку в число. В четвертой строке переменной s присваивается значение, введенное в текстовое поле Text2. В пятой строке с помощью оператора присваивания вычисляется значение переменной h.

В шестой строке в текстовое поле Text3 помещается значение переменной h. Функция Str() преобразует числовое значение в строку.