Código Delphi [-] function FarenheitToCelcius(Temperatura: real): real; begin result := (9/5) * Temperatura + 32; end;
function FarenheitToCelcius(Temperatura: real): real; begin result := (9/5) * Temperatura + 32; end;