Код процедуры, выполняющей построение графика астроиды:
Private Sub DrawAstr(ByVal g As Graphics)
Dim x As Double
Dim y As Double
Dim t As Double
Dim p_curve As New Pen(Color.Red, 0)
Dim ptf(80) As PointF
Dim i As Integer
t = -4.0
For i = 0 To 80
x = 2 * System.Math.Cos(t)_____
y = 2 * System.Math.Sin(t)_____
ptf(i).X = x
ptf(i).Y = y
t = t + 0.1
Next i
g.DrawLines(p_curve, ptf)
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, выполняющей построение графика дельтоиды:
Private Sub DrawDelt(ByVal g As Graphics)
Dim x As Double
Dim y As Double
Dim t As Double
Dim p_curve As New Pen(Color.Blue, 0)
Dim ptf(80) As PointF
Dim i As Integer
t = -4.0
For i = 0 To 80
x = System.Math.Cos(t) + 0.5 * System.Math.Cos(2 * t)
y = System.Math.Sin(t) - 0.5 * System.Math.Sin(2 * t)
ptf(i).X = x
ptf(i).Y = y
t = t + 0.1
Next i
_________________
End Sub
Введите пропущенный оператор (без пробелов, прописными буквами).
Код процедуры, выполняющей построение графика кардиоиды:
Private Sub DrawKart(ByVal g As Graphics)
Dim x As Double
Dim y As Double
Dim t As Double
Dim p_curve As New Pen(Color.Yellow, 0)
Dim ptf(80) As PointF
Dim i As Integer
t = -4.0
For i = 0 To 80
x = (1 + System.Math.Cos(t)) * System.Math.Cos(t)
y = (1 + System.Math.Cos(t)) * System.Math.Sin(t)
ptf(i).X = x
__________
t = t + 0.1
Next i
g.DrawLines(p_curve, ptf)
End Sub
Введите пропущенный оператор (без пробелов, прописными буквами).
Код процедуры, выполняющей построение графика лимаконы:
Private Sub DrawLim(ByVal g As Graphics)
Dim x As Double
Dim y As Double
Dim t As Double
Dim p_curve As New Pen(Color.Black, 0)
Dim ptf(80) As PointF
Dim i As Integer
t = -4.0
For i = 0 To 80
x = (0.3 + System.Math.Cos(t)) * System.Math.Cos(t)
y = (0.3 + System.Math.Cos(t)) * System.Math.Sin(t)
__________
ptf(i).Y = y
t = t + 0.1
Next i
g.DrawLines(p_curve, ptf)
End Sub
Введите пропущенный оператор (без пробелов, прописными буквами).
Код процедуры, выполняющей построение графика трехлистного клевера:
Private Sub DrawLeaf(ByVal g As Graphics)
Dim x As Double
Dim y As Double
Dim t As Double
Dim p_curve As New Pen(Color.Green, 0)
Dim ptf(80) As PointF
Dim i As Integer
t = -4.0
For i = 0 To 80
x = System.Math.______ * System.Math.Cos(t)
y = System.Math.______ * System.Math.Sin(t)
ptf(i).X = x
ptf(i).Y = y
t = t + 0.1
Next i
g.DrawLines(p_curve, ptf)
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
В Microsoft Visual Basic 2005 одним из классов в иерархии .NET Framework, обеспечивающим работу с графикой, является класс
В Microsoft Visual Basic 2005 для рисования прямых линий разного цвета и толщины используется метод (введите прописными буквами):
В Microsoft Visual Basic 2005 для создания пера используется класс (введите прописными буквами):
В Microsoft Visual Basic 2005 поверхностью для рисования могут служить:
Для очистки объекта Graphics используется метод (введите прописными буквами):
Для построения астроиды красного цвета необходимо задать перо с аргументом (введите прописными буквами):
Для построения дельтоиды синего цвета необходимо задать перо с аргументом (введите прописными буквами):
Для построения кардиоиды желтого цвета необходимо задать перо с аргументом (введите прописными буквами):
Для построения лимаконы черного цвета необходимо задать перо с аргументом (введите прописными буквами):
Для построения оси абсцисс используется метод (введите прописными буквами):
Для построения оси абсцисс используется метод (введите прописными буквами):
Для построения оси ординат используется метод (введите прописными буквами):
Для построения трехлистного клевера зеленого цвета необходимо задать перо с аргументом (введите прописными буквами):
Для создания графического объекта используется метод (введите прописными буквами):
При t=-4 значение X кардиоиды равно (для вывода результата воспользуйтесь процедурой MsgBox(X); результат округлите до двух знаков после запятой):
При t=-4 значение X лимаконы равно (для вывода результата воспользуйтесь процедурой MsgBox(X); результат округлите до двух знаков после запятой):
При t=-4 значение X трехлистного клевера равно (для вывода результата воспользуйтесь процедурой MsgBox(X); результат округлите до двух знаков после запятой):
При t=-4 значение X астроиды равно (для вывода результата воспользуйтесь процедурой MsgBox(X); результат округлите до двух знаков после запятой):
При t=-4 значение X дельтоиды равно (для вывода результата воспользуйтесь процедурой MsgBox(X); результат округлите до двух знаков после запятой):
При t=-4 значение Y кардиоиды равно (для вывода результата воспользуйтесь процедурой MsgBox(Y);результат округлите до двух знаков после запятой):
При t=-4 значение Y лимаконы равно (для вывода результата воспользуйтесь процедурой MsgBox(Y);результат округлите до двух знаков после запятой):
При t=-4 значение Y трехлистного клевера равно (для вывода результата воспользуйтесь процедурой MsgBox(Y);результат округлите до двух знаков после запятой):
При t=-4 значение Y астроиды равно (для вывода результата воспользуйтесь процедурой MsgBox(Y);результат округлите до двух знаков после запятой):
При t=-4 значение Y дельтоиды равно (для вывода результата воспользуйтесь процедурой MsgBox(Y);результат округлите до двух знаков после запятой):
Укажите соответствие между названием метода Microsoft Visual Basic 2005 и его назначением
