Estamos todos acostumados com o teclado do telefone da velha escola, certo? Para referência, aqui está o que parece:

Dada uma String que consiste apenas em letras ASCII minúsculas e espaços únicos , sua tarefa é retornar o número de toques que você deve fazer para digitar a String completa com um teclado de telefone como o descrito acima.

Para aqueles que não estão familiarizados com isso, veja como funciona:

• A tecla com o dígito 2, por exemplo, também possui a string abcescrita nela. Para digitar a, você deve pressionar essa tecla uma vez, pois bdeve pressionar duas vezes e cpressionar três vezes.

• Para letras consecutivas que estão na mesma tecla, você deve esperar 1 segundo antes de pressionar novamente. Portanto, se você quiser digitar cb, pressione 3 vezes c, aguarde um segundo e depois pressione duas vezes b, para continuar com 5 toques.

• O mesmo se aplica a todas as outras teclas, exceto um espaço único , que requer apenas 1 toque. Observe também as teclas 7e 9tem quatro letras nelas. O mesmo algoritmo é aplicado, a única diferença é o número de letras. As seqüências correspondentes a cada chave podem ser encontradas na imagem acima (mas em minúsculas) ou na lista a seguir, que contém todos os caracteres que você pode receber:

  "abc", "def", "ghi", "jkl", "mno", "pqrs", "tuv", "wxyz", " "
  

Casos de teste

Entrada -> Saída (Explicação)

"" -> 0 (nada deve ser tocado)
"água" -> 8 ("w, a, t" exige 1 torneira (nas teclas 9, 2 e 8), "e" requer 2 torneiras (na tecla 3), "r" requer 3 torneiras (na tecla 7 ), 1 + 1 + 1 + 2 + 3 = 8)
"sabão" -> 9 (4 + 3 + 1 + 1)
"candela" -> 13 (3 + 1 + 2 + 1 + 2 + 3 + 1)
"código de golfe" -> 20 (3 + 3 + 1 + 2 + 1 (para o espaço) + 1 + 3 + 3 + 3)
"rei da colina" -> 33 (2 + 3 + 2 + 1 + 1 + 3 + 3 + 1 + 1 + 2 + 2 + 1 + 2 + 3 + 3 + 3)

Especificações

• Aplicam-se as regras de E / S padrão e as brechas padrão.

• Você pode receber apenas entradas no tipo String nativo do seu idioma. A saída pode ser um número inteiro ou uma representação de sequência desse número inteiro.

• Este é o código-golfe , a resposta mais curta em todos os idiomas vence.

JavaScript (ES6) 77 66 64 60 bytes

(Economizou alguns bytes graças a @Johan Karlsson e @Arnauld).

s=>[...s].map(l=>s=~~s+2+'behknquxcfilorvysz'.search(l)/8)|s

f=

s=>[...s].map(l=>s=~~s+2+'behknquxcfilorvysz'.search(l)/8)|s

console.log(f(''));                 //0
console.log(f('water'));            //8
console.log(f('soap'));             //9
console.log(f('candela'));          //13
console.log(f('code golf'));        //20
console.log(f('king of the hill')); //33

05AB1E , 29 26 25 bytes

ð¢svA•22ā₂•S£ð«øðδKy.åƶOO

Experimente online!

Explicação

ð¢                         # count spaces in input
  sv                       # for each char y in input
    A                      # push the lowercase alphabet
     •22ā₂•S               # push the base-10 digit list [3,3,3,3,3,4,3,4]
            £              # split the alphabet into pieces of these sizes
             ð«            # append a space to each
               ø           # transpose
                ðδK        # deep remove spaces
                   y.å     # check y for membership of each
                      ƶ    # lift each by their index in the list
                       O   # sum the list
                        O  # sum the stack

Python 2 , 56 bytes

Usa o mesmo algoritmo da solução Javascript de @ RickHitchcock

lambda x:sum('behknquxcfilorvysz'.find(c)/8+2for c in x)

Experimente online!

Python 3 , 69 67 65 64 bytes

1 byte graças ao Sr. Xcoder.

1 byte graças a Felipe Nardi Batista.

lambda x:sum((ord(i)+~(i>"s"))%3+3*(i in"sz")+(i>" ")for i in x)

Experimente online!

Dyalog APL, 37 bytes

+/⌈9÷⍨'adgjmptw behknqux~cfilorvy~'⍳⍞

Experimente online!

Quão?

Obtenha o ⍳ndex de cada caractere de entrada na string 'adgjmptw behknqux~cfilorvy~'( se zo padrão será 28), divida por 9, arredonde e some.

JavaScript (ES6), 71 bytes

f=
s=>[...s].map(c=>t+=((c=parseInt(0+c,36))>23?c+3:c&&~-c%3)%7%4+1,t=0)|t

<input oninput=o.textContent=f(this.value)><pre id=o>

Não procure tabelas de letras! Eu não entendi direito a fórmula do @ LeakyNun, então criei a minha.

C, 211 196 bytes

A primeira submissão aqui ... parece bastante longa e vejo que essa não é uma abordagem eficiente, mas pelo menos funciona :)

f(char*n){char*k=" abcdefghijklmnopqrstuvwxyz";int t[]={0,3,3,3,3,3,4,3,4};int l=0,s,j,i;while(*n){i=0;while(k[i]){if(k[i]==*n){s=0;for(j=0;s<i-t[j];s+=t[j++]);*n++;l+=(!i?1:i-s);}i++;}}return l;}

Versão não destruída:

int f(char *n){
  char *k=" abcdefghijklmnopqrstuvwxyz";
  int t[]={0,3,3,3,3,3,4,3,4};
  int l=0,s,j,i;
  while(*n){                          // loop through input characters
    i=0;
    while(k[i]){
      if(k[i]==*n){                   // find matching char in k
        s=0;
        for(j=0;s<i-t[j];s+=t[j++]);  // sum up the "key sizes" up to the key found
        *n++;
        l+=(!i?1:i-s);                // key presses are i-s except for space (1)
      }
      i++;
    }
  }
  return l;
}

Haskell - 74 71 62 bytes

Editar: removido 3 bytes usando uma compreensão de lista em vez de filtro

Edit: Economize 9 bytes graças a Siracusa, Laikoni e Zgarb!

f=sum.(>>= \x->1:[1|y<-"bcceffhiikllnooqrrsssuvvxyyzzz",y==x])

Uso

λ> f "candela"
13
λ>

Experimente online!

Gelatina , 25 bytes

Øaḟ⁾sz©;⁶s3Z®ṭċ@€€⁸×"J$ẎS

Experimente online!

Clojure, 82 76 bytes

#(apply +(for[c %](+(count(filter #{c}"bcceffhiikllnooqrrsssuvvxyyzzz"))1)))

Oh, é mais simples de usar filtere countde usar frequencies. Original:

#(apply +(count %)(for[c %](get(frequencies"bcceffhiikllnooqrrsssuvvxyyzzz")c 0)))

A string codifica quantas vezes mais do que apenas uma vez você precisa pressionar a tecla para um determinado caractere :)

Python 3 , 91 bytes

lambda x:sum(j.find(i)+1for j in' !abc!def!ghi!jkl!mno!pqrs!tuv!wxyz'.split('!')for i in x)

Experimente online!

Python 3 , 60 bytes

Provavelmente abaixo do ideal, pois este é o meu primeiro golfe em Python.

lambda x:sum((ord(i)-8)%3.15//1+3*(i>'y')+(i>' ')for i in x)

Experimente online!

Retina , 46 36 bytes

Obrigado ao CalculatorFeline por salvar 6 bytes.

s|z
,c
[cfilorvy]
,b
[behknqux]
,,
.

Experimente online!

Java, 95 73 bytes

a->a.chars().map(b->1+(b<64?0:b+(Math.abs(b-115)<4?4:5))%(3+b/112)).sum()

Obrigado a Kevin Cruijssen por tornar a função uma expressão lambda (onde aé do tipoString ). 95 bytes se tornaram 73 bytes!

Uma expressão lambda resume a contagem de imprensa de cada caractere usando map(). map()converte cada caractere (ASCII em baixa gama caso é 97-122) no fluxo para o valor apropriado (parece onda serra simples, mas tendo em conta ambos os 4 ciclos é irritante) usando essa matemática: 1+(b<64?0:b+(Math.abs(b-115)<4?4:5))%(3+b/112). Aqui está um gráfico de desmos desse modelo.

Mathematica, 83 bytes

c=Characters;Tr[Tr@Mod[c@"bc1def1ghi1jkl1mno1pqrstuv1wxyz "~Position~#,4]+1&/@c@#]&

QBIC , 94 bytes

[_l;||_SA,a,1|p=p-(instr(@sz`,B)>0)-(instr(@cfilorvy`+C,B)>0)-(instr(@behknqux`+C+D,B)>0)+1}?p

Explicação

[    |      FOR a = 1 TO
 _l |         the length of
   ;            the input string (A$)
_SA,a,1|    Take the a'th char of A$ and assign it to B$
p=p         p is our tap-counter, and in each iteration it gets increased by the code below
            which consist of this pattern:
                instr(@xyz`,B)>0    where 
                - instr tests if arg 2 is in arg 1 (it either returns 0 or X where X is the index of a2 in a1)
                - @...` defines the letters we want to test as arg1
                - B is the current letter to count the taps for
            Each of these blocks adds 1 tap to the counter, and each block has the letters of its level
            (4-taps, 3-taps or 2-taps) and the level 'above' it.
    -(instr(@sz`,B)>0)              <-- letters that require 4 taps
    -(instr(@cfilorvy`+C,B)>0)      <-- 3 or 4 taps
    -(instr(@behknqux`+C+D,B)>0)    <-- 2, 3,or 4 taps
    +1                              <-- and always a 1-tap
}           NEXT
?p          PRINT the number of taps

Bash ,69 68 bytes

bc<<<`fold -1|tr "\n "adgjmptwbehknquxcfilorvysz +[1*9][2*8][3*8]44`

Experimente online!

Dobra um caracter por linha, translitera cada nova linha com +, cada espaço com 1e cada letra com o número correspondente de toques. bc faz a soma.

C, 92 88 bytes

c,n;f(char*s){n=0;while(c=*s++)n+=(c=='s')+3*(c>'y')+1+(c+1+(c<'s'))%3-(c<33);return n;}

APL (Dyalog) , 36 bytes

{+/(3×⍵∊'sz'),1+3|¯1+⍵⍳⍨819⌶⎕A~'SZ'}

Experimente online!

Encontrados os mod 3-índices no alfabeto sem S e Z . Como espaço, S e Z não são encontrados, eles "têm" o índice 25 (um a mais que o índice máximo), o que é bom para o espaço. Então nós só precisa adicionar 3 para cada S ou Z .

{ função anônima em que o argumento é representado por ⍵ :

 ⎕A~'SZ' o alfabeto A maiúsculo , exceto S e Z

 819⌶ minúsculas

 ⍵⍳⍨ os índices do argumento em que

 ¯1+ adicione um negativo

 3| mod-3

 1+ adicione um (isso converte todos os 0-mods em 3)

 (… ), Prepend:

  ⍵∊'sz' Booleano em que o argumento é s ou z

  3× multiplicar por 3

 +/ soma

C (gcc), 75 77 bytes

n,b;f(char*a){for(n=0;b=*a++;)n+=b<'s'?--b%3+(b>31):""[b-'s'];a=n;}

The unprintable string "" is a table of 04 01 02 03 01 02 03 04.

Try it online!

Pip, 100 90 bytes

a:qb:["abc""def""ghi""jkl""mno""pqrs""tuv""wxyz"s]Fc,#a{Fd,#b{e:((bd)@?(ac))e<4?i+:e+1x}}i

Check each character of the input for a match in each element of b. The index of that match plus 1 gets added to the total.

Try it online!