Satır başına bir tamsayı içeren bir akış / dosya düşünün. Örneğin:

123
5
99

Kodunuz bu sayıların toplamını yazmalıdır, yani 227.

Giriş formatı kesinlikle satır başına bir tam sayıdır. Örneğin, girişin bir tamsayı dizisi olarak bir satırda olduğunu varsayamazsınız.

STDIN'den dosya adı biçiminde veya istediğiniz bir adı taşıyan bir dosyaya giriş yapabilirsiniz; hangisini seçebilirsin. Giriş almanın başka yolu yoktur.

Giriş en az bir tam sayı içerecektir. Tüm tamsayıların negatif olmadığını ve toplamlarının daha düşük olduğunu varsayabilirsiniz .232

05AB1E , 2 bayt

|O

Açıklama:

|   Get input as array
 O  Sum

Çevrimiçi deneyin!

Bash + coreutils, 16 bayt

xargs|tr \  +|bc

Çevrimiçi deneyin!

Bundan sonra iki boşluk var \. Bu, negatif sayılar için de geçerlidir.

Açıklama:

xargs             # known trick to turn newlines into spaces, while adding a
                  #trailing newline when printing the result (needed for bc)
|tr \  +          # turn spaces into '+'s
|bc               # calculates the sum

Neden tr \\n +|bcdaha iyi olmadığını merak edebilirsiniz , çünkü yeni satırları doğrudan '+' ya çevirir. Peki, bu öngörülemeyen 2 hata var:

• Girdide izleyen bir yeni satır varsa, o zaman izleyen '+' 'ya dönüştürülür, bu nedenle ekleme işlemini gerçekleştirmek için sayı yoktur.
• ve en garip olanı, bc'nin girişten sonra takip eden bir yeni satır gerektirmesidir, ancak giriş satırlarının tümünü '+' ile değiştirdiniz.

MATL , 2 bayt

Us

Bu girdi olarak adlandırılan bir metin dosyasında bekler defin.

Gif ya da olmadı :

Veya çevrimiçi deneyin! ( Kurulum için Dennis'e teşekkürler! )

açıklama

Bir MATL programı çalıştırıldığında, çağrılan bir dosya definbulunursa (adı "varsayılan giriş" anlamına gelir), içeriği otomatik olarak metin olarak yüklenir ve kodu çalıştırmadan önce dizeye dizeye itilir.

İşlev U, sayıyı bir sütun vektörüne dönüştürmek için dizeyi değerlendirir ve sörtülü olarak görüntülenen toplamı hesaplar.

Japt , 2 bayt

Nx

açıklama

     Implicit: parse STDIN into array of numbers, strings, and arrays
N    Get the resulting parsed array.
 x   Sum.
     Implicit: output result of last expression

Çevrimiçi deneyin!

Yapıştır + bc, 13 bayt

paste -sd+|bc

Açıklama:

paste -s        Take one line at a time from input
        d+      Joining by '+'
          |bc   Pass as expression to bc

Başka bir kabuk cevabı!

Perl 6 , 13 bayt

say sum lines

Dene

açıklama

• lines()bir "sihirli" komut satırı giriş tutamacından satır listesini $*INveya döndürür $*ARGFILES.
• sum(…)[+] ListTüm değerlerini oluşturmadan toplamlarını hesaplayabilen Konumlandırmalar için optimize edilmesine izin vermek üzere Perl 6'ya eklendi 1..100000
  ( sumburada [+]normalde kullandığım gibi kullanmak için çok şirin olduğunu düşündüm )
• say(…).gistgirişindeki yöntemi çağırır ve ek bir yeni satırla yazdırır.

C, 53 bayt

r;main(i){for(;~scanf("%d",&i);r+=i);printf("%d",r);}

Python 3 , 28 bayt

print(sum(map(int,open(0))))

Alındığı bu uç . Bana bunun Windows'ta işe yaramayacağı söylendi.

Çevrimiçi deneyin!

Retina , 11 7 bayt

-4 Martin Ender'e teşekkürler

.*
$*
1

Çevrimiçi deneyin!

Birliğe dönüştür:

.*
$*

1S sayısını sayın :

1

Beyin Flak , 20 bayt

(([]){[{}]{}([])}{})

Çevrimiçi deneyin!

açıklama

Bu, Riley'nin sohbette yaptığı bir çözüme ait bir golf . Onun çözümü şuydu:

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

Eğer Brain-Flak'ı tanıyorsanız, bu oldukça açıklayıcıdır. İstif yüksekliğini iter ve geri saydıkça bir değer atar, sonunda tüm işlemlerin toplamını iter.

Oldukça iyi bir golf, ancak her ikisini de sıfırlıyor {}ve ([])bununla birlikte, bunların yalnızca birinden farklı olan değerleri var. Bunun yerine maskeleri çıkarır ve iki negatiften birini yaparsak neredeyse iptal etmesi gerekiyor.

([])({[{}]{}([])}{})

Her zaman bir farklılık gösterdikleri için, cevabımızın her zaman yığın yüksekliği nedeniyle kapalı olduğu talihsiz bir duruma sahibiz. Bunu düzeltmek için ilk yığının yüksekliğini saran basmanın başlangıcını hareket ettiririz.

(([]){[{}]{}([])}{})

Python 2,40 bayt

import sys;print sum(map(int,sys.stdin))

R, 11 bayt

sum(scan())

scangirişi, satır başına bir sayı alır. Ve sum, toplamlar.

Perl 5 , 9 bayt

8 bayt kodu + -pbayrak.

$\+=$_}{

Çevrimiçi deneyin!

İle -pgiriş, bir seferde bir satır okunur ve $_her seferinde kaydedilir . $\Akümülatör olarak kullanıyoruz , çünkü -pbayrak sayesinde , sonunda basılıyor. Eşsiz }{kullanılır, bu nedenle -pbayrak $\, yazdırma yerine yalnızca bir kez yazdırır $_ve $\normalde olduğu gibi okuduğu her satırda yazdırır .

Saf Bash, 37 36 bayt

Bir bayt için @KevinCruijssen için teşekkürler!

while read a;do((b+=a));done;echo $b

Çevrimiçi deneyin!

Haskell, 32 bayt

interact$show.sum.map read.lines

Çevrimiçi deneyin! .

interactgirişin tamamını stdin'den toplar, argümanı olarak verilen işleve iletir ve bu işlevden geri aldığı dizgeyi yazdırır. İşlev:

            lines   -- split input into list of lines at nl
      map read      -- convert every line to a number (read is polymorphic,
                    -- but as want to sum it later, the type checker knows
                    -- it has to be numbers)
    sum             -- sum the list of numbers
show                -- convert back to string

PHP, 22 bayt

<?=array_sum(file(t));

Bu, tamsayıların listesini içeren "t" isimli bir dosya olduğunu varsayar.

file()bir dosya açar ve her satır dizide ayrı bir öğe depolanmış halde bir dizi döndürür. array_sum()Bir dizideki tüm elemanları toplar.

Awk, 19 bayt

{s+=$1}END{print s}

Açıklama:

{s+=$1}                For all lines in the input, add to s
        END             End loop
           {print s}    Print s

dc , 14 bayt

0[+?z2=a]dsaxp

Çevrimiçi deneyin!

Açıklama:

 [      ] sa   # recursive macro stored in register a, does the following:
  +            # - sum both numbers on stack
               #   (prints to stderr 1st time since there's only 1)
   ?           # - read next line, push to stack as number
    z          # - push size of stack
     2         # - push 2
      =a       # - if stack size = 2, ? yielded something, so recurse
               # - otherwise end macro (implicit)
0              # push 0 (accumulator)
         d     # duplicate macro before storing it
            x  # Call macro
             p # The sum should be on the stack now, so print it

CJam , 5 bayt

q~]1b

Çevrimiçi deneyin!

Nasıl çalışır

q     e# Read all input from STDIN.
 ~    e# Evaluate that input, pushing several integers.
  ]   e# Wrap the entire stack in an array.
   1b e# Convert from base 1 to integer.
      e# :+ (reduce by sum) would work as well, but 1b handles empty arrays.

Python, 38 30 bayt

lambda n:sum(map(int,open(n)))

Python'da dosyalar open('filename')(açık) tarafından açılır . Ancak, bunlar yinelenebilir. Dosyayı her yinelediğinizde, bir sonraki satırı alırsınız. Böylece harita her listeyi tekrar eder, intonu çağırır ve ardından sonuçta elde edilen listeyi toplar.

Dosya adı ile giriş yapın. (yani f('numbers.txt'))

map(int, open(n))Liste anlama yerine 8 bayt kullanılarak kaydedilir . Orijinal kod:

lambda n:sum([int(i)for i in open(n)]) 

Mathematica, 19 bayt

Mathematica'nın notebook ortamını varsayar.

Tr[#&@@@Import@"a"]

Girişin bir dosyada olmasını bekler a.

Jelly , 9 8 bayt

ƈFпFỴVS

STDIN gerçekten Jelly'nin işi değil ...

Çevrimiçi deneyin!

Nasıl çalışır

ƈFпFỴVS  Main link. No arguments. Implicit argument: 0

  п      While loop; while the condition returns a truthy value, execute the body
          and set the return value to the result. Collect all results (including 0,
          the initial return value) in an array and return that array.
ƈ           Body: Yield a character from STDIN or [] if the input is exhausted.
 F          Condition: Flatten, mapping 0 to [], '0' to "0", and [] to [] (falsy).
    F     Flatten the result.
     Ỵ    Split at newlines.
      V   Evaluate the resulting strings.
       S  Take the sum.

Brachylog , 4 bayt

ṇịᵐ+

Çevrimiçi deneyin!

açıklama

ṇ         Split the Input on linebreaks
 ịᵐ       Map: String to Integer
   +      Sum

Saf bash, 30

read -d_ b
echo $[${b//'
'/+}]

Çevrimiçi deneyin.

• readBir giriş dosyası değişkene gider b. -d_söyler readhat ayırıcı olduğunu _yerinenewline
• ${b//'newline'/+}newlines bile değiştirir+
• echo $[ ... ] ortaya çıkan ifadeyi aritmetik olarak değerlendirir ve çıkarır.

Vim, 16 bayt / tuş vuruşlarını

:%s/\n/+
C<C-r>=<C-r>"<C-h>

V geriye dönük olarak uyumlu olduğundan, çevrimiçi olarak deneyebilirsiniz!

Pyth , 3 bayt

s.Q

Çevrimiçi deneyin!

 .Q  Read all of standard input, evaluating each line.
s    Take the sum.

jq , 5 bayt

add, artı komut satırı bayrağı -s.

Örneğin:

% echo "1\n2\n3\n4\n5" | jq -s add
15

Aslında 2 bayt

kΣ

Çevrimiçi deneyin!

Açıklama:

kΣ
    (implicit input - read each line, evaluate it, and push it to the stack)
k   pop all stack elements and push them as a list
 Σ  sum
    (implicit output)

dc, 22

[pq]sq0[?z2>q+lmx]dsmx

Bu olması gerekenden çok daha uzun görünüyor, ancak dosyanın sonuna gelindiğinde karar vermek zor. Bunu yapmayı düşünebilmemin tek yolu ?komuttan sonra yığın uzunluğunu kontrol etmektir .

Çevrimiçi deneyin .

[pq]                    # macro to `p`rint top-of-stack, then `q`uit the program
    sq                  # save the above macro in the `q` register
      0                 # push `0` to the stack.  Each input number is added to this (stack accumulator)
       [         ]      # macro to:
        ?               # - read line of input
         z              # - push stack length to stack
          2             # - push 2 to the stack
           >q           # - if 2 > stack length then invoke macro stored in `q` register
             +          # - add input to stack accumulator
              lmx       # - load macro stored in `m` register and execute it
                  d     # duplicate macro
                   sm   # store in register `m`
                     x  # execute macro

Makro myinelemeli olarak adlandırıldığını unutmayın . Modern dc, bu tür bir şey için kuyruk özyinelemesini uygular, bu nedenle yığının taşması konusunda endişelenmeyin.

Pyke , 4 bayt

zbrs

Çevrimiçi deneyin!

z    -   input()
 b   -  int(^)
  r  - if no errors: goto start
   s - sum(stack)