Her zaman bu yüksek seviyeli gelişmeleri elde etmek için kaç tane Pokémon'a ihtiyacınız olduğunu merak etmekten bıktınız mı? Merak etmeyin! Şimdi sizin için hesaplamak için tam bir program veya işlev yazacaksınız!

Meydan okuma:

Girdi olarak, programınız bir Pokémon'u bir sonraki seviyeye dönüştürmek için şeker maliyetlerinin bir listesini alacaktır. (Bu liste, seçtiğiniz herhangi bir sınırlayıcıyla veya işlev bağımsız değişkenleri olarak ayrılabilir). Programınız, verilen tüm katmanlar arasında gelişmek için, geliştirilecek olan da dahil olmak üzere yakalanması gereken Pokémon sayısını döndürür veya yazdırır.

Bunu nasıl hesaplıyorsunuz? Gibi:
1. Tüm şeker maliyetlerini ekleyin: 12 + 50 = 62
2. Toplamdan 3 şeker çıkarın, bu gelişmeye devam ettiğiniz bir Pokémon'dan: 62 - 3 = 59
3. Bu sayıyı 4'e bölün (yakalamak için 3, vermek için 1 Profesör), her zaman ceil()sonucu alır: ceil(59/4) = 15
4. Son olarak, yakalamanız gereken toplam Pokémon sayısını elde etmek için bu toplama 1 ekleyin, 16!

Örnek Input -> Output:

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

Kazanan:

Uygulama, telefonunuzdaki alanın çoğunu zaten kapladı, bu nedenle programınızın mümkün olduğunca kısa olması gerekiyor. En küçük bayt sayısına sahip tüm program veya işlev iki hafta içinde kabul edilecektir! (herhangi bir bağ en erken gönderilen giriş tarafından çözülür!)

05AB1E , 4 bayt

O4÷>

açıklama

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

Çevrimiçi deneyin

Jöle, 5 4 bayt

S:4‘

Çevrimiçi deneyin!

Sum, böl tamsayıdır :ile 4ve artım ‘.

Brain-Flak 112 bayt

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

Çevrimiçi Deneyin!

açıklama

Yığını toplar, birini çıkarır, dörde böler ve bir ekler.

C # REPL, 15 bayt

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

İçin yayınlar Func<IEnumerable<int>, int>.

Aslında 4 bayt

Σ¼≈u

Çevrimiçi deneyin!

Açıklama:

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

Brachylog , 5 bayt

+:4/+

Çevrimiçi deneyin!

açıklama

Çok özgün bir cevap…

+        Sum
 :4/     Integer division by 4
    +    Increment

Python 2, 21 bayt

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

Boşver!

Formül: ((sum(a)-1)//4)+1burada //olup floor-div.

BAŞ (sed + bc) 19

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

Girdi +stdin'de ayrı bir listedir
:
echo '(19+35+5+200)'| sed 's~)~+4)/4~'|bc

Haskell, 17 bayt

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

Pyke, 4 bayt

seeh

Burada deneyin!

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

Pyth, 5 bayt

h/sQ4

Burada deneyin!

Toplam girişi sQ, 4'e bölün /4ve son olarak artırın h.

CJam, 7 bayt

{:+4/)}

Burada deneyin!

Yığındaki girdiyi bekleyen ve sonucu orada bırakan adsız bir blok tanımlar.
:+listeyi 4/toplar, sonucu 4'e böler ve bunu )artırır.

Retina , 18 17 bayt

Bayt sayımı ISO 8859-1 kodlamasını varsayar.

$
¶4
.+|¶
$*
1111

Giriş satır besleme ile ayrılmıştır.

Çevrimiçi deneyin!

R, 22 bayt

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

JavaScript, 29 Bayt

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

SILOS 100 99103 karakter + 22 örnek girişi için

Test kayışını kodlayın.

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

512. noktadan başlayan yığının noktalarını değiştirmek için bir dizi komut kümesi olarak giriş yapın.
Çevrimiçi deneyin!

Python 2, 40 bayt

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