Mostrar una función Curso de Programación Visual Basic

Lección:

Tipos de datos básicos


Ejercicio:

Mostrar una función 19


Objetivo:

Cree un programa en Visual Basic 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:

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