ubiquitour.com

Cómo convertir la temperatura en QBasic

Para crear un programa Quick Basic que convierte la temperatura, primero necesita saber cómo hacer las conversiones manualmente mediante lápiz y papel. En particular, Celsius = 5/9 (grados Fahrenheit - 32), mientras que f = 9/5 (grados Celsius + 32). El resto de la tarea implica el uso de funciones como entrada para recoger datos del usuario; funciona como IF-THEN para diferenciar entre grados Fahrenheit a Celsius y de Celsius a Fahrenheit versiones; y la función de impresión para la respuesta final al usuario.

Instrucciones

1 Pregunta al usuario si quisiera convertir en Fahrenheit o Celsius mediante la función de entrada y almacenar el valor resultante en una variable de cadena:

ENTRADA de "tipo F si desea convertir a grados Fahrenheit y C Si desea convertir a grados Celsius:", $ TempString

2 Adquirir la temperatura que debe ser convertida mediante la función de entrada junto con una variable numérica:

INPUT "Introduzca la temperatura:", TempValue

3 Construir una instrucción IF que convierte la temperatura en Fahrenheit dado un valor de $ TempString "F" y convierte la temperatura en grados Celsius que dado un valor de $ TempString de "C" y guarde la temperatura calculada en la FinalTemp variable numérica:

IF $ TempString = "F" entonces

FinalTemp = 9/5 * (TempValue + 32)

ELSEIF TempString$ = "C" entonces

FinalTemp = 5/9 * (TempValue - 32)

END IF

4 La temperatura se puede convertir al usuario utilizando el comando imprimir del relé:

Imprimir "la temperatura se puede convertir"; FinalTemp;"grados."