Come fare una temperatura Conversione Programmi in QBasic

March 16

Conversione tra Fahrenheit e Celsius manualmente richiede l'utilizzo di equazioni di base: Celsius è (5/9)

(Fahrenheit-32) e Fahrenheit è (9/5) Celsius + 32. Per fare un programma in QBasic che esegue questo calcolo, è necessario sapere come recuperare i dati da un utente, analizzare i dati e quindi eseguire un'azione in base ai dati. Ciò richiede una comprensione del PRINT, INPUT e if-then funzioni.

istruzione

1 Stampare una intestazione per identificare il programma e la sua funzionalità per l'utente. Fornire un titolo per il programma e le istruzioni iniziali.

PRINT "------------------------------------"
PRINT "programma di temperatura Conversione"
PRINT "------------------------------------"
PRINT ""
PRINT "di tipo C per Celsius -> Fahrenheit (default)
PRINT "Tipo F per Fahrenheit -> Celsius)
PRINT ""

2 Acquisire risposta dell'utente (F o C) utilizzando una funzione di ingresso che memorizza il valore nella variabile stringa USERANSWER $.

INPUT "risposta"; USERANSWER $

3 Chiedere all'utente che temperatura che vorrebbe convertire, quindi memorizzare il valore nella CONVERTTEMP variabile numerica.

INPUT "Si prega di fornire una temperatura"; CONVERTTEMP

4 Costruire un'istruzione IF-THEN che controlla il valore di $ USERANSWER, esegue l'azione corrispondente e memorizza il risultato nella FINALANSWER variabile numerica. Include una clausola ELSE che esegue l'azione predefinita nel caso in cui la risposta dell'utente non è corretta.

SE USERANSWER $ = "C", quindi

FINALANSWER = 5/9 * (CONVERTTEMP - 32)

ELSEIF USERANSWER $ = F ", quindi

FINALANSWER = 9/5 * (CONVERTEMP + 32)

ALTRO

FINALANSWER = 5/9 * (CONVERTTEMP - 32)

FINISCI SE

5 Relè la risposta finale all'utente con una funzione di stampa. Utilizzare un'altra IF-THEN costruzione di adattare la risposta in base alla richiesta iniziale dell'utente.

SE USERANSWER $ = "C", quindi

STAMPA "La temperatura Celsius è"; FinalAnswer, "gradi".

ELSEIF USERANSWER $ = F ", quindi

STAMPA "La temperatura Fahrenheit è"; FinalAnswer, "gradi".

ALTRO

STAMPA "La temperatura Celsius è"; FinalAnswer, "gradi".

FINISCI SE