Структура развилка / Лр развилка (3)
.docxЗадача №1
1. Постановка задачи.
1.1 Словесное описание задачи
1.2 Состав входных и выходных переменных
Входные переменные:
x – переменная вещественного типа,
d – переменная вещественного типа.
Выходные переменные:
F – переменная вещественного типа.
2. Математическая модель задачи.
3. Схема алгоритма.
4. Код программы.
Private Sub Command1_Click()
Dim d As Single, x As Single, F As Single
x = InputBox("x=")
If x > 0 Then
d = Log(x) / Log(10)
Else
If x < 0 Then
d = 4.1 ^ (x + 0.6)
Else
d = InputBox("d=")
End If
End If
F = d + x ^ 5
Print "x=" & x, "d=" & d, "F=" & F
End Sub
6. Отладка программы.
Задание №2
1. Постановка задачи.
1.1 Словесное описание задачи
1.2 Состав входных и выходных переменных
Входные переменные:
x – переменная вещественного типа.
Выходные переменные:
Y – переменная вещественного типа
2. Математическая модель задачи.
3. Схема алгоритма.
4. Код программы.
Private Sub Command1_Click()
Dim x As Single, Y As Single
x = InputBox("x=")
If x < 0 Then
Y = Sqr(Abs(x))
Else
Y = Abs(x)
End If
Print "x=" & x, "Y=" & Y
End Sub
6. Отладка программы.