Conversión de Celsius a Fahrenheit

[h0ax]

Aunque aquí en Cuba la unidad de medida de la temperatura que se usa son los grados Celsius, está no es la única que existe; por ejemplo, aquí en América, en territorio estadounidense, el calor o frío se mide en grados Fahrenheit. El siguiente código, aunque esté realizado en Visual Basic, es fácilmente entendible por cualquier programador, y se puede llevar al lenguaje que se desee sin nada de complejidad.

Para convertir de Grados Farengheit a celsius::

Código: Seleccionar todo

'Se declara una variable de tipo float (valores decimales) para almacenar la cantidad de grados fahrenheit.
Dim grado as double
Se le resta 32 y luego se divide en resultado por 1.8
grado = (grado - 32) / 1.8
Teniendo en cuenta que el sultado podría ser demasiado largo, sería una buena práctica de programación tratar de mostrar sólo una cantidad de caracteres después de la coma.

Para convertir de Celsius a Fahrenheit.

Código: Seleccionar todo

Para convertir de Celsius a Fahrenheit se debe realizar el proceso a la inversa, es decir, se toma el valor, se multiplica por 1.8 y se le suma 32.
Text1.Text = 1.8 * Text1.Text + 32