Esse é um desafio de tamanho de byte, no qual é necessário converter uma temperatura de entrada em uma das três unidades (Celsius, Kelvin e Fahrenheit) nas outras duas.

Entrada

Você receberia uma temperatura como número seguido por uma unidade (separada por espaço). A temperatura pode ser um número inteiro ou um número de ponto flutuante (23 vs 23.0 ou 23.678).

Você pode enviar uma função ou um programa completo que leia a sequência separada por espaço do argumento STDIN / ARGV / function ou o equivalente mais próximo e imprima a saída em STDOUT ou equivalente mais próximo.

Saída

Sua saída deve ser a temperatura convertida nos outros dois formatos, separada por uma nova linha e seguida pelo caractere de unidade correspondente em cada linha (opcionalmente separado por um espaço). A ordem das duas unidades não importa.

Precisão de saída

• O número convertido deve ter precisão de pelo menos 4 casas decimais sem arredondamento.
• Zeros à direita ou casas decimais são opcionais, desde que as primeiras 4 casas decimais (sem arredondamento) sejam precisas. Você também pode pular os 4 zeros e / ou o ponto decimal, caso a resposta real tenha 4 zeros após o ponto decimal.
• Não deve haver zeros à esquerda
• Qualquer formato numérico é aceitável desde que cumpra os três requisitos acima.

Representação da unidade

A unidade de temperatura pode ser apenas um dos seguintes:

• C para Celsius
• K para Kelvin
• F para Fahrenheit

Exemplos

Entrada:

23 C

Saída:

73.4 F
296.15 K

Entrada:

86.987 F

Saída:

303.6983 K
30.5483 C

Entrada:

56.99999999 K

Saída:

-216.1500 C
-357.0700 F

Este é o código-golfe, pelo que ganha a entrada mais curta em bytes! Golfe feliz!

Entre os melhores

<script>site = 'meta.codegolf',postID = 5314,isAnswer = true,QUESTION_ID = 50740</script><script src='https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js'></script><script>jQuery(function(){var u='https://api.stackexchange.com/2.2/';if(isAnswer)u+='answers/'+postID+'?order=asc&sort=creation&site='+site+'&filter=!GeEyUcJFJeRCD';else u+='questions/'+postID+'?order=asc&sort=creation&site='+site+'&filter=!GeEyUcJFJO6t)';jQuery.get(u,function(b){function d(s){return jQuery('<textarea>').html(s).text()};function r(l){return new RegExp('<pre class="snippet-code-'+l+'\\b[^>]*><code>([\\s\\S]*?)<\\/code><\/pre>')};b=b.items[0].body;var j=r('js').exec(b),c=r('css').exec(b),h=r('html').exec(b);if(c!==null)jQuery('head').append(jQuery('<style>').text(d(c[1])));if (h!==null)jQuery('body').append(d(h[1]));if(j!==null)jQuery('body').append(jQuery('<script>').text(d(j[1])))})})</script>

CJam, 77 65 60 59 55 54 52 bytes

l~2|"459.67+1.8/'K 273.15-'C 1.8*32+'F"S/m<{~N2$}%6<

Experimente on-line no intérprete CJam .

Como funciona

l~    e# Read and evaluate the input: F, K, C -> 15, 20, 12
2|    e# Bitwise OR with 2: F, K, C -> 15, 22, 14 = 0, 1, 2 (mod 3)

"459.67+1.8/'K 273.15-'C 1.8*32+'F"S/

      e# Push ["459.67+1.8/K" "273.15-C" "1.8*32+F"].
      e# These commands convert from F to K, K to C and C to F.

m<    e# Rotate the array of commands by 15, 22 or 14 units to the left.
{     e# For each command:
  ~   e#     Execute it.
  N   e#     Push a linefeed.
  2$  e#     Copy the temperature for the next iteration.
}%    e# Collect all results in an array.
6<    e# Keep only the first 8 elements.

Python 3, 118 116 bytes

I=input()
t=eval(I[:-1])
u=ord(I[-1])%7
exec("u=-~u%3;t=[t*1.8-459.67,(t-32)/1.8,t+273.15][u];print(t,'FCK'[u]);"*2)

Executa as conversões em uma ordem rotativa K -> F -> C -> Kduas vezes.

JavaScript ( ES6 ), 127 130 132 bytes

Esperando por uma resposta esolíngüe incrível, não encontrei muito para jogar golfe aqui.

Usando a sequência de modelo, as três novas linhas são significativas e contadas.

Execute o snippet no Firefox para testar.

F=x=>([t,u]=x.split(' '),z=273.15,y=9/5,u<'F'?`${t*y+32} F
${+t+z} K`:u<'K'?`${t=(t-32)/y} C
${t+z} K`:`${t-=z} C
${t*y+32} F`)

// Predefined tests

;['23 C','86.987 F','56.99999999 K']
.forEach(v=>O.innerHTML += v+' ->\n'+F(v)+'\n\n')

<input id=I><button onclick='O.innerHTML=F(I.value)'>-></button><br>
<pre id=O></pre>

Pip, 58 57 bytes

Ft"CFK"RMbP(a-(o:[32i273.15]Ab%7))*$/95@A[tb]+(oAt%7).s.t

Recebe entrada dos argumentos da linha de comando.

Formatado e levemente sem golfe:

o:[32 0 273.15]
F t ("CFK" RM b)
  P (a - o@(Ab % 7))
    * "95"@At / "95"@Ab
    + o@(At%7)
    . s . t

Explicação:

A fórmula geral de conversão entre a unidade 1 e a unidade 2 é temp2 = (temp1 - offset1) * mult2 / mult1 + offset2 . As compensações podem ser zero absoluto ou qualquer outra temperatura conveniente; vamos usar 0 ° C.

Deslocamento múltiplo da unidade
C 5 0     
K 5 273,15
F 9 32    

Criaremos listas desses valores e os indexaremos com base na unidade com a qual estamos lidando. O Pip não possui matrizes / hashes / dicionários associativos, portanto, precisamos converter os caracteres em índices inteiros. Talvez haja padrões úteis com os valores ASCII.

Unidade Asc A% 2 Mult A% 7 A% 7% 3 Deslocamento
C 67 1 5 4 1 0
K 75 1 5 5 2 273,15
F 70 0 9 0 0 32

Isso parece promissor. Mais um fato útil: os índices em Pip envolvem. Portanto, na verdade, não precisamos do %3tempo que estivermos indexando em algo de comprimento 3. Definir o:[32 0 273.15]e usar (o (Ab)%7)fará o truque. ( Aobtém o valor ASCII de um caractere. A (l i)sintaxe é usada para indexar em iterables, bem como para chamadas de função.)

Para os multiplicadores, precisamos apenas dos dois números 9 e 5. Como os números são iguais às seqüências de caracteres no Pip e, portanto, são indexáveis, obter o multiplicador é tão simples quanto 95@Ab(usando o outro método de indexação, o @operador).

Usando os recursos de programação de array do Pip, podemos salvar um caractere sobre o método ingênuo:

95@At/95@Ab
$/95@A[tb]    Make a list of t and b, apply 95@A(...) to each item, and fold on /

Por fim, adicione o deslocamento para a nova unidade, concatene um espaço e o símbolo da nova unidade no final e imprima.

Fazemos isso para cada tno "CFK" RM b, convertendo, assim, para cada unidade, exceto o original.

Chamada de amostra:

C:\Golf> pip.py tempConv.pip 86.987 F
30.548333333333332 C
303.6983333333333 K

(Para mais informações sobre o Pip, consulte o repositório .)

dc, 102 bytes

Tenho certeza de que isso pode ser mais praticado, mas aqui está o começo:

4k[9*5/32+dn[ F
]n]sf[459.67+5*9/dn[ K
]n]sk[273.15-1/dn[ C
]n]sc[rlfxlkxq]sC[lkxlcxq]sF?dC=CF=Flcxlfx

dc mal faz a nota neste. Especificamente, o manuseio de string dc não é realmente adequado para o trabalho. Mas tudo o que precisamos fazer é diferenciar entre "C", "F" e "K". Felizmente, dc analisa "C" e "F" como números hexadecimais 12 e 15. E para "K", apenas deixa 0 na pilha.

Saída:

$ dc -f tempconv.dc <<< "23 C"
73.4000 F
296.1500 K
$ dc -f tempconv.dc <<< "86.987 F"
303.6983 K
30.5483 C
$ dc -f tempconv.dc <<< "56.99999999 K"
-216.1500 C
-357.0700 F
$

C, 160 bytes

float v,f[]={1,1.8,1},d[]={0,32,273.15};u,t,j;main(){scanf("%f %c",&v,&u);for(u=u/5-13,v=(v-d[u])/f[u];j<2;)t=(++j+u)%3,printf("%f %c\n",f[t]*v+d[t],"CFK"[t]);}

Isto lê de stdin. Nenhuma precisão de saída é especificada; portanto, ela imprime o printf()que parecer ser de impressão, com mais de quatro dígitos.

Versão não destruída:

#include <stdio.h>

float v, f[] = {1.0f, 1.8f, 1.0f}, d[] = {0.0f, 32.0f, 273.15f};
char u;
int t, j;

int main() {
    scanf("%f %c", &v, &u);
    u = u / 5 - 13;
    v = (v - d[u]) / f[u];
    for( ; j < 2; ) {
        t = (++j + u) % 3;
        printf("%f %c\n", f[t] * v + d[t], "CFK"[t]);
    }

    return 0;
}

Algumas explicações / observações:

• Isso é baseado em tabelas de pesquisa f e dcontém os fatores de multiplicação e as compensações para converter Celsius em qualquer outra unidade (incluindo o próprio Celsius, para evitar casos especiais).
• Se ufor a unidade de entrada, u / 5 - 13mapeia Cpara 0, Fpara 1 eK para 2.
• A entrada é sempre convertida para Celsius.
• O loop itera sobre as duas unidades que não são a entrada e converte o valor Celsius nessa unidade.
• A versão golfed usa uma intvariável em vez de uma charvariável para receber a scanf()entrada. Essa é uma incompatibilidade de tipo, que só produzirá resultados corretos em pequenas máquinas endian (que são quase todas elas atualmente).

Python 2, 168 bytes

Eu vi a solução Python 3 quando estava prestes a postar isso, mas sei lá, estou apenas praticando golfe.

s=raw_input().split();v=eval(s[0]);c,t=(v-32)/1.8,v-273.15
print[["%fC\n%fF"%(t,t*1.8+32),"%fK\n%fC"%(c+273.15,c)][s[1]=="F"],"%fK\n%fF"%(v+273.15,v*1.8+32)][s[1]=="C"]

Ungolfed:

def conv(s):
    s = s.split()
    v = float(s[0])
    if s[1]=="C":
        print "%f K\n%f F"%(v+273.15,v*1.8+32)
    elif s[1]=="F":
        v = (v-32)/1.8
        print "%f K\n%f C"%(v+274.15,v)
    else:
        c = v-273.15
        print "%f C\n%f F"%(c,c*1.8+32)

Perl, 85 80 76

#!perl -nl
print$_=/C/?$_+273.15." K":/K/?$_*9/5-459.67." F":5/9*($_-32)." C"for$_,$_

Teste- me .

PHP, 161 153

function f($i){list($v,$u)=split(" ",$i);$u==C||print($v=$u==K?$v-273.15:($v-32)*5/9)."C\n";$u!=K&&print $v+273.15 ."K\n";$u!=F&&print $v*9/5+32 ."F\n";}

http://3v4l.org/CpvG7

Seria bom jogar mais dois personagens para entrar no top 10 ...

Python 2, 167

s=raw_input();i=eval(s.split()[0]);d={"C":"%f K\n%f F"%(i+273,32+i*1.8),"K":"%f C\n%f F"%(i-273,i*1.8-459.4),"F":"%f C\n%f K"%(i/1.8-17.78,i/1.8+255.2)};print d[s[-1]]`

Esta é minha primeira tentativa no CodeGolf.

Pitão, 126 bytes

AYZczdJvY=Y*JK1.8
?%"%f F\n%f K",+32Y+J273.15qZ"C"?%"%f F\n%f C",-Y459.67-J273.15qZ"K"?%"%f C\n%f K",c-J32K*+J459.67c5 9qZ"F"

Isso parece muito longo para mim ... tudo bem.

R, 150 144 141 bytes

a=scan(,"");U=c("C","K","F");i=which(U==a[2]);Z=273.15;x=scan(t=a[1]);cat(paste(c(C<-c(x,x-Z,5*(x-32)/9)[i],C+Z,32+C*9/5)[-i],U[-i]),sep="\n")

Recuado, com novas linhas:

a=scan(,"")
U=c("C","K","F")
i=which(U==a[2])
Z=273.15
x=as.double(a[1])
cat(paste(c(C<-c(x,x-Z,5*(x-32)/9)[i],C+Z,32+C*9/5)[-i],
            U[-i]),
    sep="\n")

Uso:

> a=scan(,"");U=c("C","K","F");i=which(U==a[2]);Z=273.15;x=scan(t=a[1]);cat(paste(c(C<-c(x,x-Z,5*(x-32)/9)[i],C+Z,32+C*9/5)[-i],U[-i]),sep="\n")
1: 23 C
3: 
Read 2 items
Read 1 item
296.15 K
73.4 F
> a=scan(,"");U=c("C","K","F");i=which(U==a[2]);Z=273.15;x=scan(t=a[1]);cat(paste(c(C<-c(x,x-Z,5*(x-32)/9)[i],C+Z,32+C*9/5)[-i],U[-i]),sep="\n")
1: 56.9999999 K
3: 
Read 2 items
Read 1 item
-216.1500001 C
-357.07000018 F
> a=scan(,"");U=c("C","K","F");i=which(U==a[2]);Z=273.15;x=scan(t=a[1]);cat(paste(c(C<-c(x,x-Z,5*(x-32)/9)[i],C+Z,32+C*9/5)[-i],U[-i]),sep="\n")
1: 86.987 F
3: 
Read 2 items
Read 1 item
30.5483333333333 C
303.698333333333 K

Graças a @AlexA. & @MickyT. !

Javascript, 206 193 187 175 162 159 159 156

e=273.15,a=prompt(f=1.8).split(" "),b=+a[0],X=b-32,c=a[1];alert(c=="F"&&(X/f+"C\n"+(X/f+e+"K"))||(c=="C"?b*f+32+"‌​F\n"+(b+e+"K"):b*f-459.67+"F\n"+(b-e+"C")))

Agradeço ao Optimizer e Ismael Miguel por me ajudarem a jogar um pouco mais.

Mathematica, 66

Esperançosamente corrija este tempo.

Print[1##]&@@@Reduce[F==1.8K-459.67&&C==K-273.15&&#==#2,,#2];&@@#&

Exemplo

%[37 C]   (* % represents the function above *)

310,1 K

98,6 F

Excel, 239 bytes

=IF(RIGHT(A1,1)="C",LEFT(A1,LEN(A1)-2)+273.15&"K
"&9*LEFT(A1,LEN(A1)-2)/5+32&"F",IF(RIGHT(A1,1)="K",LEFT(A1,LEN(A1)-2)-273.15&"C
"&(LEFT(A1,LEN(A1)-2)*9/5-459.67&"F",(LEFT(A1,LEN(A1)-2)+459.67)*5/9&"K
"&(LEFT(A1,LEN(A1)-2)-32)*5/9&"C"))

112 bytes dos quais são usados ​​para separar Valor e Unidade. Alguém conhece uma solução melhor?