Imports System

Public Module Module1

    Public Sub Main()

        dim c as string 

        Console.WriteLine("Es culpable ")

        c=console.ReadLine()

        if c="si" then 

            console.write("Vas a la carcel")

            console.Write(" la documentacion por favor")

        else 

            console.Writeline("Vas a la casa ")

            console.Write(" la documentacion por favor")

        end if 

    End Sub

End Module