Código para resolver la fórmula E=mc2

Código para resolver la fórmula E=mc²

Definir las variables de la ecuación:

La fórmula expresa que la Energía (E) de un cuerpo en reposo es igual a su Masa (m) por la Velocidad de la Luz (c) al cuadrado, pero el valor numérico de la velocidad de la luz que se utilice depende de las unidades en que se encuentre la velocidad.

Información a tener en cuenta:

Imagen extraída del buscador Google

La velocidad de la luz en el vacio es de

300,000 Km/seg (3x10^5Km/seg) equivalente a

300,000,000 m/seg (3x10^8 m/seg) equivalente a

30,000,000,000 cm/seg (3x10^10 cm/seg)

Solución de la ecuación:

Los siguientes ejercicios de Masa y Energía han sido resueltos, explicados y tomados del canal de Youtube Aulamax, así como los valores numéricos de la velocidad de la luz; el código ha sido escrito en Visual Basic.

Variables a usar:

em es nuestra variable para los valores de energía y masa según sea el caso.

res es la variable para guardar los cálculos y mostrarlos en pantalla.

luz es nuestra constante.

exp es una variable para los valores exponenciales del ejercicio 2 y 3.

Ejercicio 1. Cuando un kilogramo de uranio reacciona en una bomba atómica, solo 0,915 g se transformaron en energía ¿Cuánta energía se produce?

Link del video: https://www.youtube.com/watch?v=UTzDbfUtJKQ

Vista de la aplicación WindowsForm

Código 1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        em = TextBox1.Text

        res = (em * (luz) ^ 2)

        TextBox2.Text = res

        If ComboBox1.Text = "kg" Then

            TextBox2.Text = TextBox2.Text + " x " + "10^10 Joules"

        End If

        If ComboBox1.Text = "g" Then

            TextBox2.Text = TextBox2.Text + " x " + "10^20 Ergios"

        End If

        If ComboBox1.Text = "lb" Then

            TextBox2.Text = TextBox2.Text + " x " + "10^16 Poundal pie"

        End If

  End Sub

Ejercicio 2. Cuando estalla 500 g de nitroglicerina, se liberan 4x10¹³ ergios. ¿Cuanta masa intervino en dicha transformación?

Link del video: https://www.youtube.com/watch?v=LVn6ca6Ao6s

Vista de la aplicación WindowsForm

Código 2

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        em = TextBox3.Text

        exp = TextBox5.Text

        res = em / (luz) ^ 2

        res = Format(res, "0.00")

        TextBox4.Text = res

        If ComboBox2.Text = "Joules" Then

            exp = exp - 10

            Label6.Text = exp

            Label8.Text = "Kilogramos"

        End If

        If ComboBox2.Text = "ergio" Then

            exp = exp - 20

            Label6.Text = exp

            Label8.Text = "gramos"

        End If

        If ComboBox2.Text = "poundal pie" Then

            exp = exp - 20

            Label6.Text = exp

            Label8.Text = "libras"

        End If

End Sub

Ejercicio 3. Cuando una bomba atómica de un kilogramo hace explosión, solamente 9,0x10^-4 se transforma en energía. ¿Cuanta energía se desprende?

Link del video: https://www.youtube.com/watch?v=omKpXpOeCyQ

Vista de la aplicación WindowsForm

Código 3

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        em = TextBox8.Text

        exp = TextBox7.Text

        res = em * (luz) ^ 2

        If ComboBox3.Text = "kg" Then

            TextBox6.Text = res

            Label11.Text = exp + 8 * 2

            Label9.Text = "Joules"

        End If

        If ComboBox3.Text = "g" Then

            TextBox6.Text = res

            Label11.Text = exp + 10 * 2

            Label9.Text = "Ergios"

        End If

        If ComboBox3.Text = "lb" Then

            TextBox6.Text = res

            Label11.Text = exp + 10 * 5

            Label9.Text = "¨Poundal pie"

        End If

End Sub