@Andrii_UA

Проблема построения графика линейной функции y=3x+1 на языке Visual Basic?

Ниже приведён код, в котором эта функция прописана, но график должен быть поднят на одно значение Y вверх, я прибавил 1 к "3 * x", но результата нет, в чём проблема? Также прикрепляю фото результат 643531c9db64c200318795.png

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim g As Graphics = PictureBox1.CreateGraphics
        Dim MyPen As New Pen(Color.Aqua)
        MyPen.Width = 2
        MyPen.Color = Color.Aqua
        Dim x, y, x1, y1 As Integer
        x = -150
        While x <= 150
            x1 = x + 150
            y = 3 * x + 1
            y1 = 100 - y
            g.DrawEllipse(MyPen, x1, y1, 2, 2)
            x += 1
        End While
        MyPen.Dispose()
    End Sub
  • Вопрос задан
  • 108 просмотров
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы
ЮГПА Ростов-на-Дону
от 130 000 до 170 000 ₽
Сигнатек Новосибирск
До 200 000 ₽
N.Academy Москва
от 100 000 ₽