Dim x As Integer = 10

Dim c As Integer = 3

Dim y As Integer = 5 * x - 6 * c + 7

Console.WriteLine("При x = " & x & " и c = " & c & ", y = " & y)