O desafio é simples:

Escreva uma função ou programa que receba uma entrada xe emita o alfabeto em minúsculas se fizer xparte do alfabeto em minúsculas, emita o alfabeto em maiúsculas se xfaz parte do alfabeto em maiúsculas e emite apenas xse não faz parte de nenhum deles.

Regras:

• A entrada pode ser argumento de função ou de STDIN
• A entrada será qualquer um dos caracteres ASCII imprimíveis de 32 a 126 (espaço para til).
• A entrada pode estar entre aspas 'x'ou "x", mas lembre-se disso 'e "é uma entrada válida e deve ser suportada.
• A entrada pode ser qualquer uma das letras do alfabeto, ou seja, você não pode assumir que será aou A.
• A saída deve ser apenas um dos alfabetos ou o símbolo único, mas as novas linhas finais estão OK.
• As letras do alfabeto não devem ser separadas por espaços, vírgulas ou qualquer outra coisa.

Alguns exemplos:

F
ABCDEFGHIJKLMNOPQRSTUVWXYZ

z
abcdefghijklmnopqrstuvwxyz

"
"

    <- Input:  Space
    <- Output: Space

O código mais curto em bytes vence.

Opcional, mas apreciado: se o seu idioma tiver um intérprete on-line, poste também um link para que possa ser facilmente testado por outras pessoas.

Entre os melhores

O snippet de pilha na parte inferior desta postagem gera o catálogo a partir das respostas a) como uma lista da solução mais curta por idioma eb) como uma tabela geral de líderes.

Para garantir que sua resposta seja exibida, inicie-a com um título, usando o seguinte modelo de remarcação:

## Language Name, N bytes

onde Nestá o tamanho do seu envio. Se você melhorar sua pontuação, poderá manter as pontuações antigas no título, identificando-as. Por exemplo:

## Ruby, <s>104</s> <s>101</s> 96 bytes

Se você quiser incluir vários números em seu cabeçalho (por exemplo, porque sua pontuação é a soma de dois arquivos ou deseja listar as penalidades de sinalizador de intérprete separadamente), verifique se a pontuação real é o último número no cabeçalho:

## Perl, 43 + 2 (-p flag) = 45 bytes

Você também pode transformar o nome do idioma em um link que será exibido no snippet:

## [><>](http://esolangs.org/wiki/Fish), 121 bytes

var QUESTION_ID=67357,OVERRIDE_USER=44713;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

TeaScript , 5 bytes

xN(0)

O TeaScript possui (quase) interno para isso: D

Experimente on-line (observação: o intérprete on-line foi atualizado para o TeaScript v3, portanto, onde está N0)

Experimente todos os casos de teste

TeaScript 3 , 2 bytes [não concorrente]

Usando o TeaScript 3, isso pode se transformar em 2 bytes. Isso não é concorrente porque o TeaScript 3 foi criado após esse desafio

N0

Alternativa de 1 byte

Se pudéssemos produzir 0123456789dígitos, então poderia ser:

°

Pitão, 10 bytes

h/#z[GrG1z

Suíte de teste

Começamos construindo uma lista com 3 elementos: o alfabeto em minúsculas, o alfabeto em maiúsculas e a entrada. ( [GrG1z) Em seguida, filtramos essa lista no número de aparências da entrada nos elementos que não são zero. ( /#z) Finalmente, pegamos o primeiro elemento da lista filtrada.

LabVIEW, 23 primitivas do LabVIEW

O seletor (o? Na estrutura cse) está conectado a um vi chamado Classe Lexical. Ele gera números de 1 a 6, dependendo da entrada, 5 é minúsculo e 4 é maiúsculo.

O loop for vai 26 vezes para criar um alfabeto ou uma vez para passar o símbolo.

Haskell, 48 bytes

f c=filter(elem c)[['a'..'z'],['A'..'Z'],[c]]!!0

Exemplo de uso:

*Main> f 'g'
"abcdefghijklmnopqrstuvwxyz"
*Main> f 'H'
"ABCDEFGHIJKLMNOPQRSTUVWXYZ"
*Main> f '\''
"'"

Pegue todas as listas de ['a' .. 'z'], ['A' .. 'Z'] e a lista de singleton com a entrada char conde cé o elemento de. Para letras, sempre temos duas correspondências, então escolhemos a primeira.

JavaScript (ES6), 79 bytes

x=>(a="abcdefghijklmnopqrstuvwxyz",x>"`"&x<"{"?a:x>"@"&x<"["?a.toUpperCase():x)

Explicação

O JavaScript compara o código de cada caractere em ordem alfabética ao comparar seqüências de caracteres; portanto, os códigos dos caracteres usados ​​nas comparações são 1 abaixo e acima do intervalo de caracteres necessário.

x=>(
  a="abcdefghijklmnopqrstuvwxyz", // a = lower-case alphabet
  x>"`"&x<"{"?a:                  // if x is a lower-case letter, output alphabet
  x>"@"&x<"["?a.toUpperCase():    // if x is an upper-case letter, output upper-case
  x                               // else just output x
)

Teste

var solution = x=>(a="abcdefghijklmnopqrstuvwxyz",x>"`"&x<"{"?a:x>"@"&x<"["?a.toUpperCase():x)

X = <input type="text" oninput="result.textContent=solution(this.value)" />
<pre id="result"></pre>

R, 90 75 bytes

a=scan(,'');l=letters;L=LETTERS;cat("if"(a%in%l,l,"if"(a%in%L,L,a)),sep="")

Graças a Giuseppe .

Versão antiga (90 bytes):

a=scan(,'');l=letters;L=LETTERS;if(a%in%l)cat(l,sep="")else if(a%in%L)cat(L,sep="")else a

Parece feio, mas esses cats não podem ser terceirizados para funções, IMHO.

Python 3, 92 84 82 74 bytes

Versão atual: 74, graças a isaacg e wnnmaw!

lambda c:(c,''.join(chr(x+(67,97)[c>'Z'])for x in range(25)))[c.isalpha()]

Ungolfed: (para algumas definições de ungolfed

lambda c:
    (
        c,
        ''.join([chr(x + (67,97)[c > 'Z']) for x in range(25)])
    )
    [c.isalpha()]

Primeira versão: 92

def f(c):print(''.join([chr(x+(97if c>'Z'else 65)) for x in range(25)])if c.isalpha()else c)

Segunda versão: 82, graças a isaacg! :)

lambda c:''.join(chr(x+(97if c>'Z'else 65))for x in range(25))if c.isalpha()else c

Python 3, 118 105 98 97 83 bytes

Solução simples. Edição: Golfed com agradecimentos à sugestão de Erik o jogador de golfe.

lambda s,a='ABCDEFGHIJKLMNOPQRSTUVWXYZ':(s,(a,a.lower())[s.islower()])[s.isalpha()]

Ungolfed:

def f(s):
 a='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 if s.isalpha():
  if s.islower():return a.lower()
  else:return a
 return s

PHP, 62 76 82 bytes

O PHP está bem agora:

<?=ctype_alpha($x=$argv[1])?join(range(Z<$x?a:A,Z<$x?z:Z)):$x;

Recebe uma entrada da linha de comando, como:

$ php alphabet.php A
$ php alphabet.php "a"
$ php alphabet.php " "
$ php alphabet.php _

Editar% s

• Economizou 6 bytes substituindo 91>ord($x)por Z<$x. Pensei muito complicado. Graças à manatwork .
• Salvou 14 bytes removendo strtouppere construindo o intervalo exigido diretamente.

Perl, 46 34 33 bytes

inclui +2 para -nE

say/[a-z]/?a..z:/[A-Z]/?A..Z:$_

Correr como

perl -nE 'say/[a-z]/?a..z:/[A-Z]/?A..Z:$_'

• atualização 34 economize 12 bytes, omitindo fore usando palavras de barras, graças a @Dom Hastings .
• atualização 33 economize 1 byte usando -Ee em sayvez de print.

Ruby, 41 + 1 = 42

Com o interruptor -p, execute

([*?A..?z]*'').scan(/\w+/){$&[$_]&&$_=$&}

Isso gera a string

ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz

e verifica cada bloco contíguo de "caracteres da palavra", que são apenas os alfabetos em minúsculas e maiúsculas e o caractere sublinhado. Se houvesse vários caracteres consecutivos entre Z e a, esse truque não funcionaria.

Editado para adicionar explicação, mediante solicitação:

A -pbandeira faz essencialmente

while( $_ = STDIN.gets )
  #execute code
  print $_
end

[*?A..?z]é a matriz de caracteres entre A maiúsculo e Z minúsculo, na ordem ASCII. Esse é o alfabeto maiúsculo, alguns caracteres que não são da letra e o alfabeto minúsculo. *''junta o array em uma string, para que possamos chamá .scan-lo. scanencontrará cada correspondência da expressão regular /\w+/, preencherá a variável mágica$& e chamará o bloco. Cada vez que o bloco é iterado, ele verifica se a sequência correspondente contém $_e define a saída para essa sequência. Portanto, se $ _ estiver contido no alfabeto maiúsculo ou minúsculo, ele será modificado de acordo, caso contrário, não será alterado.

A versão não-gasta seria algo como

while ($_ = STDIN.gets )
 %w[ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz].each do |alphabet|
  $_ = alphabet if alphabet.include?($_)
 end
 print $_
end

CJam, 18 bytes

'[,65>_elr:R]{R&}=

'[,65>empurra o alfabeto em maiúsculas, _elo alfabeto em minúsculas e r:Ruma sequência de caracteres simples que é lida em STDIN e atribuída à variável R. Elas são agrupadas em uma matriz ( ]) e a primeira que possui caracteres em comum Ré selecionada usando {R&}=.

Retina, 62 bytes

[a-z]
abcdefghijklmnopqrstuvwxyz
[A-Z]
ABCDEFGHIJKLMNOPQRSTUVWXYZ

As duas linhas curtas são o regex a combinar. Se a entrada estiver em minúscula (no intervalo[a-z] ), ela substituirá esse caractere (nesse caso, que é a entrada inteira) pelo alfabeto em minúscula. O processo é semelhante para maiúsculas. Se não for uma carta, nenhuma substituição será feita e a saída será intocada.

Experimente online.

Python 2.7.10, 95 93 79 bytes

Esta é a minha primeira vez, mesmo tentando jogar golfe, então por favor, qualquer ajuda ou conselho é extremamente apreciada!

from string import* 
lambda i:(i,(uppercase,lowercase)[i.islower()])[i.isalpha()]

Obrigado a Morgan Thrapp pela ajuda!

Ruby, 46 43 caracteres

(Código de 42 caracteres + opção de linha de comando de 1 caractere)

[?a..?z,?A..?Z].map{|r|r===$_&&$_=[*r]*""}

Graças a:

• Jordan for the ===magic (-3 caracteres)

Exemplo de execução:

bash-4.3$ echo -n 'm' | ruby -pe '[?a..?z,?A..?Z].map{|r|r===$_&&$_=[*r]*""}'
abcdefghijklmnopqrstuvwxyz

bash-4.3$ echo -n 'W' | ruby -pe '[?a..?z,?A..?Z].map{|r|r===$_&&$_=[*r]*""}'
ABCDEFGHIJKLMNOPQRSTUVWXYZ

bash-4.3$ echo -n '@' | ruby -pe '[?a..?z,?A..?Z].map{|r|r===$_&&$_=[*r]*""}'
@

MATL , 22 bytes

jtt1Y2XIm~Iw?km?Ik]]1$

Isso usa a versão atual (3.1.0) do idioma.

EDIT (15 de setembro de 2017): Experimente no MATL Online! (com uma versão mais recente do idioma).

Exemplos

>> matl jtt1Y2XIm~Iw?km?Ik]]1$
> e
abcdefghijklmnopqrstuvwxyz

>> matl jtt1Y2XIm~Iw?km?Ik]]1$
> T
ABCDEFGHIJKLMNOPQRSTUVWXYZ

>> matl jtt1Y2XIm~Iw?km?Ik]]1$
> "
"

Explicação

j              % input string (assumed to be a single character)        
tt             % duplicate twice
1Y2            % predefined literal: uppercase letters
XI             % copy to clipboard I         
m~             % check if not member    
I              % paste from clipboard I      
w              % swap elements in stack      
?              % if
    k          % convert string to lowercase 
    m          % check if member         
    ?          % if                          
        I      % paste from clipboard I      
        k      % convert string to lowercase 
    ]          % end                         
]              % end                         
1$             % input specification for implicit printing

Java, 165 caracteres

class A {public static void main(String[]p){int c=p[0].charAt(0),d=c|32,b=(d-96)*(d-123),e=b<0?65|(c&32):c,f=e+(b<0?26:1);for(;e<f;e++){System.out.print((char)e);}}}

Gera a saída necessária para o stdout (em vez de retorná-lo). A entrada é via argumentos de tempo de execução.

Como funciona.

1) Configure algumas variáveis ​​inteiras
c = o valor ASCII do primeiro caractere do primeiro parâmetro dos argumentos de tempo de execução.
d = c convertido em valor ASCII em minúscula (ORing com 32)
b = cálculo para ver se d é uma letra. Será <0 se uma carta.
e = O caractere inicial para a saída. Se o valor ASCII em d for uma letra (consulte b), será definido como 'A' (ou 'a' adicionando c AND 32 ao valor ASCII 'A'), caso contrário, será definido como o valor original de c.
f = o número de caracteres para saída. Se não for uma letra (consulte b), então isso é definido como 1; ele é definido como 26
2) Loop de e para e + f, gerando cada caractere para stdout.

Perl, 23 bytes

Inclui +2 para -nE(em vez do +1 normal) ser justo com a outra solução perl

Execute com a entrada STDIN sem seguir a nova linha:

echo -n g | perl -lnE 'say/\pL/?a&$_|A..Z:$_'

Apenas o código:

say/\pL/?a&$_|A..Z:$_

Lua, 98 97 bytes

Infelizmente, não encontrei uma solução com menos de 26 bytes para definir acom o alfabeto. Na verdade, não achei menor que 32.

Edit: save 1 Byte, graças a @ATaco, estava cometendo muito este erro quando iniciado com Lua: p

c=io.read()a="abcdefghijklmnopqrstuvwyz"print(not c:find"%a"and c or c:find"%u"and a:upper()or a)

Você pode testá-lo online no site oficial ou em ideone . Se você usar o primeiro, a entrada não funcionará (desativada), portanto, use a seguinte fonte, onde está agrupada em uma função.

function f(c)
  a="abcdefghijklmnopqrstuvwyz"
  print(not c:find"%a"and c or c:find"%u"and a:upper()or a)
end

print(f("\""))
print(f("a"))
print(f("Q"))

Mathematica, 75 bytes

#/.Thread[Join[a=Alphabet[],b=ToUpperCase@a]->Array[""<>If[#>26,b,a]&,52]]&

Pontuação muito boa para um idioma que não seja golfe ... Quaisquer soluções que usem processamento de código de caracteres levariam mais bytes, devido aos custos de ToCharacterCodee FromCharacterCode.

C (função), 71 bytes

f(s,n,c){n=1;if(isalpha(s))s-=s%32-1,n=26;for(c=s;c<s+n;)putchar(c++);}

Python, 81 bytes

f=lambda z,a="abcdefghijklmnopqrstuvwxyz":[k for k in[a,a.upper(),z]if z in k][0]

Esta é basicamente uma tradução da resposta Pyth. Ele define uma função fque toma como argumento o caractere e retorna o resultado.

Jolf , 17 bytes

Experimente aqui.

? hpLipl? hpUipui
?                  if
  hpL               the lowercase alphabet (array) contains
     i               the input
      pl            return the lowercase alphabet (string)
        ?          else if
          hpU       the uppercase alphabet (array) contains
             i       the input
              pu    return the uppercase alphabet (string)
                i  otherwise, return the input
                   implicit: print the result

MATLAB: 71 68 bytes

i=input('');b=i<65|i>122|(i>90&i<97);[i*b,~b*((65:90)+32*(i>96)),'']

(graças ao OP por salvar 3 bytes)

Teste:

i='a'
ans=
abcdefghijklmnopqrstuvwxyz

i='A'
ans=
ABCDEFGHIJKLMNOPQRSTUVWXYZ

i='~'
ans=
~

Explicação: O alfabeto maiúsculo ocupa 65:90caracteres ASCII. Alfabeto em minúsculas está em 97:122ASCII. Portanto, b=i<65|i>122|(i>90&i<97)verifica se o caractere de entrada iNÃO é alfabético. Nesse caso, a entrada é retornada. O alfabeto maiúsculo é retornado se b==1e i<97(caractere maiúsculo). Se b==1e i>96, 32 é adicionado a 65:90isso corresponde a 97:122- o alfabeto em minúsculas.

SpecBAS, 111 bytes

Eu já passei por várias versões disso, 111 parece ser o melhor que posso gerenciar.

1 INPUT l$: a$="abcdefghijklmnopqrstuvwxyz"
2  ?IIF$(l$ IN ["a" TO "z","A" TO "Z"],IIF$(l$=UP$ l$,UP$ a$,a$),l$)

A linha 2 usa o ?atalho para instruções PRINTembutidas aninhadasIF

Explicação do pseudo-código

IF character IN "a".."z","A".."Z"
THEN
 IF character = UPPERCASE character
 THEN
  print UPPERCASE alphabet
 ELSE
  print alphabet
 ENDIF
ELSE
 print the character
ENDIF

Swift 2, 142 bytes

func d(s:String)->String{let a="abcdefghijklmnopqrstuvwxyz";for v in s.utf8{return v>64&&v<91 ?a.uppercaseString:(v>96&&v<123 ?a:s)};return s}

Ungolfed

func d(s: String) -> String{
    let a="abcdefghijklmnopqrstuvwxyz"
    for v in s.utf8{
        return (
            v > 64 && v < 91 ?
            a.uppercaseString :
            (
                v > 96 && v < 123 ?
                a :
                s
            )
        )
     }
    return s
}

05AB1E , 19 16 bytes

-3 bytes graças a else

DAsåiAëDAusåiAuë

Como funciona

                   # implicit input
D                  # duplicate
 A                 # push lowercase alphabet
  s                # swap last two elements
   å               # push a in b
    i              # if
     A             # lowercase alphabet
      ë            # else
         D         # duplicate
          Au       # uppercase alphabet
            s      # swap last two elements
             å     # push a in b
              I    # if
               Au  # uppercase alphabet
                 ë # else leave input
                   # implicit print

Experimente online!

Java SE 8, 71 69 bytes

Golfe:

(a,s)->{char b=97;if(a<91)b-=32;a=b;b+=26;while(a<b)s+=a++;return s;}

Ungolfed:

(a,s)->{          // String as a parameter. If declaration is necessary it adds 8 bytes
char b = 97;      // Uppercase A char, this is important
if (a < 91)       // If it is not past 'z', where a is a char param
    b -= 32;      // Then go back to the lowercase alphabet
a = b;            // Done to prevent a cast
b += 26;          // End of alphabet
while (a < b)     // Go to end of alphabet
    s += a++;     // Append character
return s;}        // Then return

Eu havia implementado originalmente o seguinte

String s="";char b=96;if(a-91<0)b-=32;for(char c=b;++c<b+27;)s+=c;return s;

É mais elegante, mas infelizmente é um byte maior. Isso pressupõe que o comportamento para caracteres não alfa seja indefinido e a sequência "" s seja inicializada como "" antes da execução. Seja gentil, é o meu primeiro post.

editar: 2 bytes salvos por Stewie Griffin alterando

a - 91 < 0 to a < 91

Scala, 91 caracteres

(c:Char)=>{var a='a'.to('z').mkString;if(c.isUpper)a=a.toUpperCase;if(!c.isLetter)a=""+c;a}

Sem golfe

def f(c: Char): String = {
    var a='a'.to('z').mkString //set up lower case default response
    if (c.isUpper) {
        a = a.toUpperCase     //mutate the result if upper case
    }        
    if (!c.isLetter) { 
      a = ""+c                 //mutate the result if not a letter
    }
    a                         //return result
}

Ter um resultado mutável inicial em vez de retornar um valor imutável de 3 distintos se mais blocos me salvou 2 caracteres, mesmo que eu odeie.

Método escala-tônico

Um método melhor para o scala seria algo como isto:

def convertToAlphabet(c: Char): String = {
    c match {
      case x if !x.isLetter => x.toString
      case x if x.isUpper => ('A' to 'Z').mkString
      case _ => ('a' to 'z').mkString
    }
}

Japonês, 9 bytes

;[CBU]æøU

Execute-o online