3.3.3. Пример выполнения задания
1. Протабулировать функцию на указанном отрезке
2. Результаты отобразить в MSFLEXGRID
3. Интерфейс пользователя, соответствующий описанному выше, выглядит следующим образом
4. Программный код, реализующий алгоритм решения
Private Sub Command1_Click()
Dim x As Double
Dim y As Double
Dim k As Integer
Dim xn As Double
Dim xk As Double
Dim dx As Double
k = 0
xn = 0: xk = 6: dx = 0.5
g1.Rows = (xk - xn) / dx + 2
g1.Cols = 4
For i = 0 To 3
g1.ColAlignment(i) = 4
g1.ColWidth(i) = 1800
Next i
g1.TextMatrix(0, 0) = "x"
g1.TextMatrix(0, 1) = "x<2"
g1.TextMatrix(0, 2) = "x=2"
g1.TextMatrix(0, 3) = "x>2"
k = k + 1
For x = xn To xk Step dx
g1.TextMatrix(k, 0) = x
If x < 2 Then
y = x ^ 2
g1.TextMatrix(k, 1) = y
k = k + 1
ElseIf x = 2 Then
y = Log(x) + Tan(x)
g1.TextMatrix(k, 2) = y
k = k + 1
Else
y = (Sin(x) ^ 2) ^ (1 / 3)
g1.TextMatrix(k, 3) = y
k = k + 1
End If
Next x
End Sub
6. Результаты расчетов в VB 6
7. Результаты расчетов в Mathcad (листинг приведен ниже)
3.4. Задание 4
Разработать алгоритм и написать программу на языке программирования Бейсик для обработки данных, представленных одномерным массивом. В алгоритме и программе предусмотреть ввод и вывод данных на форму согласно требованиям, указанным в задании, с использованием метода PRINT.
3.4.1. Указания к выполнению задания Массивы.
Массивом называется совокупность индексированных элементов. Например, двумерный массив можно выразить a(i,j), где i означает номер строки, j – номер столбца. Массивы в VB можно классифицировать по следующим признакам : числу измерений, области видимости, способу распределения памяти. VB позволяет создавать одномерные и многомерные массивы. Число размерностей массива может достигать до 60.
Нумерация элементов массива начинается с нуля. Для изменения индексации с нуля на единицу используется оператор Option Base N, где N может принимать значения 0 и 1. Оператор Option Base записывается в раздел General.
Объявление массивов осуществляется следующим образом
Dim B(10) As Double – одномерный массив, содержит 11 элементов;
Dim C(5 TO 8, 1 TO 10) As Integer – двухмерный массив, имеет 4 строкb и 10 столбцов. Нумерация строк начинается с 5, а нумерация столбцов с единицы. Следует различать:
Массивы со статическим распределением памяти.
Эти массивы объявляются один раз и не меняют своих размерностей в процессе выполнения программы. Границы размерностей задаются только числами, нельзя использовать для указания размерности переменные.
Массивы с динамическим распределением памяти. Эти массивы объявляются в два этапа. Сначала они объявляются без указания размерности:
Dim AMassiv ( ) As Variant.
Затем с помощью оператора ReDim устанавливаются фактические размерности массива. В отличие от оператора Dim оператор ReDim используется только в процедурах. Оператор ReDim допускает использование переменных для указания размерностей массивов:
ReDim MassivA(5, 10 ) As Integer
ReDim MassivB(m, n ) As Single