Sub Main()
Dim x, y, z, a, b As Double
Console.Write("calcular raiz cubica de :")
x = Console.ReadLine
Console.Write("calcular potencia al cuadrado de :")
y = Console.ReadLine
z = x ^ (1 / 3)
a = y ^ 2
b = z + a
Console.WriteLine("la raiz cubica es:" & z)
Console.WriteLine("la potencia al cuadrado es :" & a)
Console.Write("la suma de ambos resultados es : " & b)
Console.Read()
End Sub
End Module
No hay comentarios:
Publicar un comentario