Utilice análisis dimensional para determinar la fuerza explosiva de una bomba 

Encuentre una expresión para la energía de una explosión en términos de densidad de masa, radio y tiempo.

In[1]:=

X energyExpression = DimensionalCombinations[{ QuantityVariable["MassDensity"], QuantityVariable["Radius"], QuantityVariable["Time"] }, QuantityVariable["Energy"]]

Out[1]=

Encuentre la energía de una explosión para valores particulares de densidad de masa, radio y tiempo.

In[2]:=

X energy = energyExpression /. { QuantityVariable["MassDensity"] -> Quantity[1, "Kilograms"/"Meters"^3], QuantityVariable["Radius"] -> Quantity[140, "Meters"], QuantityVariable["Time"] -> Quantity[0.025, "Seconds"]} // First

Out[2]=

Convierta la energía a kilotones de TNT.

In[3]:=

X UnitConvert[energy, "KilotonsOfTNT"]

Out[3]=