teorema-examen | C# Online Compiler

teorema-examen by mp.castillo@ccbantigua.edu.gt

Imports System
'EXAMEN FINAL
'HECHO POR: Mari Castillo
Public Module Module1
    Public Sub Main()
        Console.WriteLine("OPCIÓN")
        CONSOLE.WriteLine("1. TEOREMA")
        DIM OPCION AS INTEGER 
        OPCION = CONSOLE.ReadLine()
        SELECT OPCION 
        CASE 1 
            TEOREMA 
        END SELECT 
    End Sub
    PRIVATE SUB TEOREMA 
        DIM A, B1, B2
        DIM H AS DOUBLE 
        CONSOLE.WriteLine("INGRESE VARIABLE A")
        A = CONSOLE.ReadLine()
        CONSOLE.WriteLine("INGRESE VARIABLE B1: ")
        B1 = CONSOLE.ReadLine()
        CONSOLE.WriteLine("INGRESE VARIABLE B2: ")
        B2 = CONSOLE.ReadLine()
		'no usar variable 0 
        IF A>0 AND B1>0 AND B2>0 THEN
            H= MATH.Sqrt(A^2+B1^2*B2^3)
            CONSOLE.WriteLine("LA RESPUESTA ES: " & H)
    ELSE 

        END IF 
    END SUB 
End Module

​x
 
Imports System
'EXAMEN FINAL
'HECHO POR: Mari Castillo
Public Module Module1
    Public Sub Main()
        Console.WriteLine("OPCIÓN")
        CONSOLE.WriteLine("1. TEOREMA")
        DIM OPCION AS INTEGER 
        OPCION = CONSOLE.ReadLine()
        SELECT OPCION 
        CASE 1 
            TEOREMA 
        END SELECT 
    End Sub
    PRIVATE SUB TEOREMA 
        DIM A, B1, B2
        DIM H AS DOUBLE 
        CONSOLE.WriteLine("INGRESE VARIABLE A")
        A = CONSOLE.ReadLine()
        CONSOLE.WriteLine("INGRESE VARIABLE B1: ")
        B1 = CONSOLE.ReadLine()
        CONSOLE.WriteLine("INGRESE VARIABLE B2: ")
        B2 = CONSOLE.ReadLine()
        'no usar variable 0 
        IF A>0 AND B1>0 AND B2>0 THEN
            H= MATH.Sqrt(A^2+B1^2*B2^3)
            CONSOLE.WriteLine("LA RESPUESTA ES: " & H)
    ELSE 
​
        END IF 
    END SUB 
End Module

int1 is equal to: 1
int1 is equal to: 2
int1 is equal to: 3
int1 is equal to: 4
int1 is equal to: 5
int1 is equal to: 6
int1 is equal to: 7
int1 is equal to: 8
int1 is equal to: 9
int1 is equal to: 10
int1 is equal to: 11
int1 is equal to: 12
int1 is equal to: 13
int1 is equal to: 14
int1 is equal to: 15
int1 is equal to: 16
int1 is equal to: 17
int1 is equal to: 18
int1 is equal to: 19
int1 is equal to: 20
int1 is equal to: 21
int1 is equal to: 22
int1 is equal to: 23
int1 is equal to: 24
int1 is equal to: 25
int1 is equal to: 26
int1 is equal to: 27
int1 is equal to: 28
int1 is equal to: 29
int1 is equal to: 30
int1 is equal to: 31
int1 is equal to: 32
int1 is equal to: 33
int1 is equal to: 34
int1 is equal to: 35
int1 is equal to: 36
int1 is equal to: 37
int1 is equal to: 38
int1 is equal to: 39
int1 is equal to: 40
int1 is equal to: 41
int1 is equal to: 42
int1 is equal to: 43
int1 is equal to: 44
int1 is equal to: 45
int1 is equal to: 46
int1 is equal to: 47
int1 is equal to: 48
int1 is equal to: 49
int1 is equal to: 50
int1 is equal to: 51
int1 is equal to: 52
int1 is equal to: 53
int1 is equal to: 54
int1 is equal to: 55
int1 is equal to: 56
int1 is equal to: 57
int1 is equal to: 58
int1 is equal to: 59
int1 is equal to: 60
int1 is equal to: 61
int1 is equal to: 62
int1 is equal to: 63
int1 is equal to: 64
int1 is equal to: 65
int1 is equal to: 66
int1 is equal to: 67
int1 is equal to: 68
int1 is equal to: 69
int1 is equal to: 70
int1 is equal to: 71
int1 is equal to: 72
int1 is equal to: 73
int1 is equal to: 74
int1 is equal to: 75
int1 is equal to: 76
int1 is equal to: 77
int1 is equal to: 78
int1 is equal to: 79
int1 is equal to: 80
int1 is equal to: 81
int1 is equal to: 82
int1 is equal to: 83
int1 is equal to: 84
int1 is equal to: 85
int1 is equal to: 86
int1 is equal to: 87
int1 is equal to: 88
int1 is equal to: 89
int1 is equal to: 90
int1 is equal to: 91
int1 is equal to: 92
int1 is equal to: 93
int1 is equal to: 94
int1 is equal to: 95
int1 is equal to: 96
int1 is equal to: 97
int1 is equal to: 98
int1 is equal to: 99
int1 is equal to: 100

Cached Result
Last Run:	5:59:42 am
Compile:	0.205s
Execute:	0s
Memory:	72kb
CPU:	0.047s

View IL Code