|
Conversion entre Fahrenheit et Celsius exige manuellement en utilisant les équations de base : Celsius est (5/9 ) * (Fahrenheit -32) et Fahrenheit est (9/5) * Celsius +32 . Pour faire un programme dans QBasic qui effectue ce calcul, vous devez savoir comment récupérer les données d'un utilisateur , d'analyser ces données et ensuite effectuer une action sur la base des données. Cela nécessite une compréhension de l'impression , INPUT et Si-Alors fonctions . Instructions
1 impression sur un en-tête pour identifier le programme et ses fonctionnalités à l'utilisateur. Donner un titre pour le programme et les instructions initiales.
PRINT " ------------------------------- ----- programme de conversion de température "PRINT" " PRINT" --------------------------------- --- " print" " IMPRESSION " Type C pour Celsius - > Fahrenheit (par défaut) PRINT "Type F pour Fahrenheit -> Celsius) print" "
2 Acquérir la réponse de l' utilisateur (F ou C) en utilisant une fonction d'entrée qui stocke la valeur dans la variable chaîne USERANSWER $
INPUT " réponse " ; . USERANSWER $
< br > 3 Demandez à l'utilisateur quelle température il aimerait convertir, puis stocker la valeur de la variable numérique ConvertTemp
INPUT " S'il vous plaît fournir une température " ; . ConvertTemp
4 < p> Construire une instruction IF -THEN qui vérifie la valeur de USERANSWER $ , exécute l'action et stocke le résultat dans la FINALANSWER variable numérique correspondant . Inclure une clause ELSE qui exécute l'action par défaut en cas de réponse de l'utilisateur est incorrect
Si USERANSWER $ = " C " ALORS
de FINALANSWER = 5/9 * ( ConvertTemp - 32).
ELSEIF USERANSWER $ = F ",
FINALANSWER = 9 /5 * ( CONVERTEMP + 32)
AUTRE
FINALANSWER = 5/9 * ( ConvertTemp - 32)
END IF
5 relais de la réponse finale à l'utilisateur avec une fonction d'impression . Utiliser un autre IF- construisent ensuite d'adapter la réponse en fonction de la demande initiale de l'utilisateur
Si USERANSWER $ = " C " ALORS
PRINT " La température Celsius est"; . FinalAnswer ; «degrés ».
ELSEIF USERANSWER $ = F ",
print" La température Fahrenheit est "; FinalAnswer ; ». degrés "
AUTRE Photos PRINT " La température Celsius est"; FinalAnswer ; ». degrés "
END IF et
|
