Escrever um algoritmo e um programa que leia uma temperatura em graus Fahrenheit. Calcular a conversão desta temperatura para graus Centígrados. Mostrar a temperatura lida em graus Centígrados. A fórmula de conversão é: C = (F – 32) / 1.8. Onde F é a temperatura em Fanrenheit e C é a temperatura em Centígrados. – Show Delphi

DICAS

Visite a biblioteca de dicas da comunidade.

Saiba mais

ARTIGOS

Abordagens detalhadas sobre assuntos diversos.

Saiba mais

INICIANTES

Aprenda a programar de um modo simples e fácil.

Saiba mais

DOWNLOADS

Acesse os materiais exclusivos aos membros.

Saiba mais
voltar

PARA QUEM GOSTA DE DELPHI

Escrever um algoritmo e um programa que leia uma temperatura em graus Fahrenheit. Calcular a conversão desta temperatura para graus Centígrados. Mostrar a temperatura lida em graus Centígrados. A fórmula de conversão é: C = (F – 32) / 1.8. Onde F é a temperatura em Fanrenheit e C é a temperatura em Centígrados.

 

 

Sugestão de resposta do algoritmo em linguagem algorítmica:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
programa AlgoritmoSequencial0003;
 
var
  vTempF, vTempC : Real;
inicio
 
  escreva('Informe a temperatura em graus Fahrenheit.');
  leia(vTempF);
 
  vTempC := (vTempF - 32) / 1.8;
 
  escreva('A temperatura em graus Centígrados é: ', (vTempF));
 
fim.

 

Sugestão de resposta em Pascal / Delphi Console.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
{ Para escrever acentos em pascal, devemos usar a tabela ASCII. }
 
program Prj00003AlgoritmosSequencias;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
 
var
  vTempC, vTempF : Real;
begin
  Writeln('Algoritmo 00003 - Algoritmos sequenciais. Show Delphi.');
 
  Write(#10 + 'Informe a temperatura em graus Fahrenheit: ');
  Readln(vTempF);
 
  vTempC := (vTempF - 32) / 1.8;
 
  Writeln(#10 + 'A temperatura em graus Centigrados '#130': ', (vTempC) :0:2);
 
  Write(#10#10, 'Tecle "Entrer" para sair.');
  Readln;
end.

 

Sugestão de resposta em C, C++ / C Builder

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
#include <vcl.h>
#pragma hdrstop
 
#include <tchar.h>
#include <stdio.h>
#include <conio.h>
#include <stdlib.h>
#include <time.h>
#include <string.h>
 
//---------------------------------------------------------------------------
 
#pragma argsused
void _tmain(){
 
	printf("Algoritmo 00003 - Algoritmos sequenciais. Show Delphi.\n");
	system("chcp 1252 > nul");
 
	printf("\nInforme a temperatura em graus Fahrenheit: ");
	float vTempF;
	scanf("%f", &vTempF);
 
	float vTempC;
	vTempC = (vTempF - 32) / 1.8;
 
	printf("\nA temperatura em graus Centígrados é: %-7.2f", (vTempC));
 
	printf("\n\n");
	system("pause");
}

Sugestão de resposta em Java

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
package exercicio3;
 
import javax.swing.JOptionPane;
 
/**
 *
 * @author Franciele Benedetti
 */
public class Exercicio3 {
 
    public static void main(String[] args) {
 
        Double grausFahrenheit = 0.0;
        Double grausCentigrados;
 
        System.out.println("Informe a temperatura em graus Fahrenheit");
        grausFahrenheit = Double.parseDouble(JOptionPane.showInputDialog("Informe a temperatura em graus Fahrenheit"));
 
        grausCentigrados = (grausFahrenheit - 32) / 1.8;
        System.out.println("A temperatura em graus Centigrados é: " + grausCentigrados);
    }
}

Envie também a sua sugestão de algoritmo para showdelphi@showdelphi.com.br.

Facebook Comments

Posts Relacionados

  • Administrador
  • 1.552 views
  • 0 comentários
  • 4 de abril de 2015

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Ir ao topo

© 2016 Infus Soluções em Tecnologia - Todos os Direitos Reservados