¿Cansado de preguntarte siempre cuántos Pokémon más necesitas atrapar para obtener esas evoluciones de alto nivel? ¡Extrañar más! ¡Ahora escribirá un programa o función completa para calcularlo por usted!

El reto:

Como entrada, su programa recibirá una lista de los costos en dulces para evolucionar a un Pokémon al siguiente nivel. (Esta lista puede estar separada por cualquier delimitador de su elección, o como argumentos de función). Luego, tu programa devolverá o imprimirá la cantidad de Pokémon que debes atrapar, incluido el que se desarrollará, para evolucionar a través de todos los niveles dados.

¿Cómo se calcula esto? Así:
1. Suma todos los costos de dulces: 12 + 50 = 62
2. Resta 3 dulces del total, esto es del único Pokémon que conservas para evolucionar: 62 - 3 = 59
3. Divide este número entre 4 (3 para atrapar, 1 para dárselo al Profesor), siempre tomando el ceil()resultado: ceil(59/4) = 15
4. Finalmente, suma 1 a este total para obtener el número total de Pokémon que debes atrapar, ¡16!

Ejemplo Input -> Output:

[4] -> 2
[50] -> 13
[12, 50] -> 16
[25, 100] -> 32
[19, 35, 5, 200] -> 65

Victorioso:

La aplicación ya ha ocupado la mayor parte del espacio en su teléfono, por lo que su programa debe ser lo más breve posible. ¡Se aceptará el programa completo o la función con el recuento de bytes más pequeño en dos semanas! (¡con cualquier vínculo resuelto por la entrada presentada más temprano!)

05AB1E , 4 bytes

O4÷>

Explicación

O    # sum
 4÷  # integer division by 4
   > # increment

Pruébalo en línea

Jalea, 5 4 bytes

S:4‘

Pruébalo en línea!

Sum, entero dividido :por 4e incrementado ‘.

Brain-Flak 112 bytes

([]<([()])>){{}({}{})([][()])}{}{({}[()])<>(({}[()()()]<({}())>)){{}(<({}()()()()<({}[()])>)>)}{}<>}{}<>{}({}())

¡Pruébelo en línea!

Explicación

Suma la pila, resta uno, divide entre cuatro y agrega uno.

C # REPL, 15 bytes

n=>n.Sum()/4+1;

Lanza a Func<IEnumerable<int>, int>.

En realidad, 4 bytes

Σ¼≈u

Pruébalo en línea!

Explicación:

Σ¼≈u
Σ     sum
 ¼    divide by 4
  ≈   floor
   u  add 1

Brachylog , 5 bytes

+:4/+

Pruébalo en línea!

Explicación

Una respuesta muy original ...

+        Sum
 :4/     Integer division by 4
    +    Increment

Python 2, 21 bytes

lambda a:~-sum(a)/4+1

Ideone it!

Fórmula: ((sum(a)-1)//4)+1donde //está floor-div.

BASH (sed + bc) 19

sed 's~)~+4)/4~'|bc

La entrada es una +lista separada en stdin
Eg:
echo '(19+35+5+200)'| sed 's~)~+4)/4~'|bc

Haskell, 17 bytes

(+1).(`div`4).sum

Pyke, 4 bytes

seeh

Pruébalo aquí!

((sum(input)/2)/2)+1

Pyth, 5 bytes

h/sQ4

Pruébalo aquí!

Suma la entrada con sQ, divide entre 4 con /4y finalmente incrementa h.

CJam, 7 bytes

{:+4/)}

Pruébalo aquí!

Define un bloque sin nombre que espera la entrada en la pila y deja el resultado allí.
:+suma la lista, 4/divide el resultado entre 4 e )incrementa eso.

Retina , 18 17 bytes

El recuento de bytes asume la codificación ISO 8859-1.

$
¶4
.+|¶
$*
1111

La entrada está separada por salto de línea.

Pruébalo en línea!

R, 22 bytes

floor(sum(scan())/4+1)

JavaScript, 29 bytes

x=>x.reduce((a,b)=>a+b)/4+1|0

SILOS 100 99 103 caracteres + 22 para entrada de muestra

Código con arnés de prueba.

set 512 52
set 513 10
GOSUB e
GOTO f
funce
a = 0
i = 511
lblE
i + 1
b = get i
a + b
if b E
a / 4
a + 1
return
lblf
printInt a

ingrese como una serie de comandos establecidos para modificar los puntos del montón comenzando en el punto 512. ¡
Pruébelo en línea!

Python 2, 40 bytes

import math
lambda s:math.ceil(sum(s)/4)