Chapter III

Дата добавления: 2015-08-29; просмотров: 468

Структура Развилка

I. Разработать проект информационной технологии на языке программирования Visual Basic

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

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

1.1 Описание задачи:

1.2 Формализация входных и выходных данных:

Входные данные: d – любое число.

Выходные данные: C – результат вычисления функции.

2. Разработка алгоритма:

3. Разработка проекта:

3.1 Разработка формы:

Форма включает следующие элементы управления:

ü два элемента управления “Командная кнопка” для запуска программы;

3.2 Разработка кода приложения:

Private Sub Command1_Click()

Dim d As Single

Dim C As Single

d = InputBox(“Введите значение d”, “Входные данные”)

If d => 1 And d<=10Then

C=(d^3)+1

Else

If d < 0 Then

C=a^(1/3)

Else

C=0

End if

End if

MsgBox "При d = " & d & " С = " & C

End Sub

4. Результат выполнения: