Skriv en COBOL PGM for at konvertere Celsius Fahrenheit?

Identifikationsafdeling.

Program-id. Celsius-to-Fahrenheit.

Dataafdeling.

Arbejdsopbevaringsafsnit.

01 Celsius-Value PIC 99V99.

01 Fahrenheit-værdi PIC 99V99.

Procedurafdeling.

Vis "Indtast temperaturen i celsius (c):".

Accepter Celsius-værdi.

Beregn Fahrenheit-værdi =(Celsius-værdi * 9/5) + 32.

Vis "Temperaturen i Fahrenheit (F) er:", Fahrenheit-værdi.

Stop løb.

`` `

Forklaring:

1. Identifikationsafdeling: Indeholder program-ID, som er "Celsius-to-Fahrenheit".

2. Dataafdeling:

- Arbejdsopbevaringsafsnit:

- celsiusværdi: En variabel til opbevaring af temperaturen i celsius.

- fahrenheit-værdi: En variabel til opbevaring af temperaturen i Fahrenheit.

3. Procedurafdeling:

- Vis "Indtast temperaturen i celsius (c):": Beder brugeren om at komme ind i temperaturen i celsius.

- Accepter celsiusværdi: Læser brugerinput og gemmer den i variablen "Celsius-Value".

- Beregn Fahrenheit-værdi =(Celsius-værdi * 9/5) + 32: Beregner Fahrenheit -temperaturen ved hjælp af konverteringsformlen.

- Vis "Temperaturen i Fahrenheit (F) er:", Fahrenheit-værdi: Viser den konverterede Fahrenheit -temperatur.

- stopkørsel: Afslutter programudførelsen.

Sådan kører du dette program:

1. kompilere: Brug en COBOL -kompilator til at kompilere programmet.

2. Udfør: Kør det kompilerede program.

3. input: Programmet beder dig om at komme ind i temperaturen i celsius.

4. output: Programmet viser temperaturen i Fahrenheit.

Eksempel:

Hvis du går ind i 25.00 Som temperaturen i celsius, udsender programmet:

`` `

Temperaturen i Fahrenheit (F) er:77,00

`` `