Определить пройдёт ли график функции y=3x^2-7x+6 через точку (x,y) из qбесика

Извините, QBASIC'a у меня нет, но, переписать несложно, вот код на Visual Basic
Sub Main()
  Dim X, Y As Double
  X = Console.Read()
  Y = Console.Read()
  If (Y = 3 * X^2 - 7X + 6) Then
    Console.WriteLine("Yes")
  Else
    Console.WriteLine("No")
  End If
End Sub