Resumindo GAE1

Este guia de auto estudo não tem um nível dificuldade alto, mas por ser o primeiro foi difícil de ser concluído.

Objetivo: Criar um programa que converta unidades diferentes de temperatura (de Farhenheit, Kelvin e Rankine para graus Centígrados) utilizando PascaL e Excel, tendo, desse modo, que lidar com a linguagem usada em programação.

Programa Fonte:
program temperaturasilas
var C,C1,C2,F,K,R:real {temperaturas};
begin
{entrada de dados}
writeln('Forneça a temperatura em Farhenheit');
readln(F);
writeln('forneça a temperatura em Kelvin');
readln(K);
writeln('forneça a temperatura em Rankine');
readln(R);
{Conversão}
C := (5/9)*(F-32);
C1:= (K-273.15);
C2:= (5/9)*(R-491.67);
{Saida de dados}
writeln(F, ' graus Farhenheit, corresponde a ');
writeln (C, ' graus Centigrados');
writeln(K, ' graus Kelvin, corresponde a ');
writeln (C1, ' graus Centigrados');
writeln(R, ' graus Rankine, corresponde a ');
writeln (C2, ' graus Centigrados');
end.