• Home
  • Química
  • Astronomia
  • Energia
  • Natureza
  • Biologia
  • Física
  • Eletrônicos
  •  Science >> Ciência >  >> Química
    Escreva um PGM COBOL para converter o centígrado Fahrenheit?
    `` `COBOL
    Divisão de Identificação.
    Programa-ID. Centigrrado para fahrenheit.

    Divisão de dados.
    Seção de armazenamento de trabalho.
    01 PIC CENTIGRADE-VALUE 99V99.
    01 FAHRENHEIT-VALUE PIC 99V99.

    Divisão de procedimentos.
    Exiba "Digite a temperatura no Centigrado (C):".
    Aceite o valor centigrado.

    Calcule Fahrenheit-Value =(Valor Centigrado * 9/5) + 32.

    Exibir "A temperatura em Fahrenheit (f) é:", Fahrenheit-Value.

    Pare de corrida.
    `` `

    Explicação:

    1. Divisão de identificação: Contém o ID do programa, que é "centigrrado para Fahrenheit".

    2. Divisão de dados:
    - Seção de armazenamento de trabalho:
    - Valor do Centigrado: Uma variável para armazenar a temperatura no centígr.
    - fahrenheit-valor: Uma variável para armazenar a temperatura em Fahrenheit.

    3. Divisão de procedimentos:
    - Exibir "Digite a temperatura no Centigrado (C):": Solicita que o usuário insira a temperatura no centígr.
    - Aceite o valor centigrado: Lê a entrada do usuário e o armazena na variável "Centigrade-Value".
    - calcular Fahrenheit-value =(Centigrado-Valor * 9/5) + 32: Calcula a temperatura de Fahrenheit usando a fórmula de conversão.
    - Exibir "A temperatura em Fahrenheit (f) é:", Fahrenheit-Value: Exibe a temperatura convertida de Fahrenheit.
    - Stop Run: Termina a execução do programa.

    Como executar este programa:

    1. compilar: Use um compilador COBOL para compilar o programa.
    2. Execute: Execute o programa compilado.
    3. entrada: O programa solicitará que você entre na temperatura no Centigrado.
    4. saída: O programa exibirá a temperatura em Fahrenheit.

    Exemplo:

    Se você entrar 25,00 À medida que a temperatura no Centigrade, o programa será lançado:

    `` `
    A temperatura em Fahrenheit (f) é:77,00
    `` `
    © Ciência https://pt.scienceaq.com