Guia de Auto Estudo 1 - Introdução a programação

OBJETIVO

Escrever um programa que utilizem construtos fundamentais (entrada e saída de da-dos) para conversão de temperaturas e implementar algoritmos que envolvam intera-ção com planilha eletrônica.

PROGRAMA FONTE-PASCAL

program temperaturafernandammorais;

var C,F,R,K,M: real;

begin

M:=0;

while M<>4 do

begin

writeln('Tecle 1 para conversão de Fahrenheit para graus Celsius');
writeln('Tecle 2 para conversão de Rankine para graus Celsius');
writeln('Tecle 3 para conversão de Kelvin para graus Celsius');
writeln('Tecle 4 para sair');
readln(M);


if M=1

then begin

{Entrada de dados}
{Conversão Fahrenheit para Celsius}

writeln('Forneça a temperatura em Fahrenheit');
readln(F);

{conversão}
C:=(5/9)*(F-32);

{Saída de dados}
writeln(F,'graus Fahrenheit, cor responde a');
writeln(C,'graus Celsius');

end
else
begin


if M=2

then begin

{Entrada de dados}

{Conversão Rankine para Celsius}
writeln('Forneça a temperatura em Rankine');
readln(R);

{conversão}
C:=(R-32-459.67)/1.8;

{Saída de dados}
writeln(R,'Rankine corresponde a');
writeln(C,'graus Celsius');
end
else
begin


if M=3
then begin

{Entrada de dados}
{Kelvin para Celsius}
writeln('Forneça a temperatura em Kelvin');
readln(K);

{conversão}
C:=(K-273.15);

{Saída de dados}
writeln(K,'Kelvin, corresponde a');
writeln(C,'graus Celsius');
end

end;
end;
end;

end.

TABELA DE CONVERSÃO DE TEMPERATURA

TESTE REALIZADO NO  PROGRAMA DE CONVERSÃO DE TEMPERATURA

 COMENTÁRIO

Esse GAE foi o primeiro contato com a programação de computadores, utilizei nele construtos fundamentais como writeln, fórmulas ja conhecidas e o comando IF. Minha maior dificuldade foi o comando IF, que fui conhecê-lo por meio do livro indicado para essa disciplina. No resto, foi bem tranquilo a realização desse desafio.