Mostrar una función Aprende programación con ejercicios Visual Basic (VB.net)

Lección:

Ejercicio:

Mostrar una función 46

Objetivo:

Cree un programa en Visual Basic (VB.net) para "dibujar" el gráfico de la función y = (x-4)2 para valores enteros de x que van desde -1 a 8. Mostrará tantos asteriscos en pantalla como el valor obtenido para "y", así :

************************
****************
*********
****
*

*
****
*********
****************

Código:

Mostrar Código

Imports System
Public Class exercise57
    Public Shared Sub Main()
        Dim x, y, j As Integer

        For x = -1 To 8
            y = (x - 4) * (x - 4)

            For j = 0 To y - 1
                Console.Write("*")
            Next

            Console.WriteLine()
        Next
    End Sub
End Class