Matriz bidimensional 2: circunferencia en pantalla Curso de Programación Visual Basic

Lección:

Matrices, Estructuras y Cadenas


Ejercicio:

Matriz bidimensional 2: circunferencia en pantalla 16


Objetivo:

Cree un programa de Visual Basic que declare que crea una matriz bidimensional de caracteres de 70x20, "dibuja" una circunferencia o radio 8 dentro de ella y la muestra en la pantalla.

Sugerencia: los puntos en la circunferencia se pueden obtener utilizando:

x = xCenter + r * cos angle
y = yCenter + r * sin angle

"sin" y "cos" esperan que el ángulo se mida en radianes, en lugar de grados. Para convertir de una unidad a la otra, debe recordar que 360 grados = 2 radianes PI (o 180 grados = radianes PI): radianes flotantes = (ángulo * Math.PI / 180.0);

Puede dibujar 72 puntos (como hay 360 grados en una circunferencia, estarían espaciados 5 grados entre sí)

Sugerencia: en Visual Basic, el coseno es Math.Cos, el seno es Math.Sin y PI es Math.PI


Código:

Imports System
Public Class exercise93
    Public Shared Sub Main()
        Dim r, x, y As Double

        For i As Integer = 0 To 360 - 1 Step 5
            rad = i * Math.PI / 180.0
            x = 35 + 8 * Math.Cos(rad)
            y = 10 + 8 * Math.Sin(rad)
            Console.SetCursorPosition(CInt(x), CInt(y))
            Console.Write("X")
        Next

        Console.SetCursorPosition(1, 20)
    End Sub
End Class