Xem xét một luồng / tệp với một số nguyên trên mỗi dòng. Ví dụ:

123
5
99

Mã của bạn sẽ xuất tổng của các số này, đó là 227.

Định dạng đầu vào đúng là một số nguyên trên mỗi dòng. Ví dụ, bạn không thể giả sử đầu vào nằm trên một dòng dưới dạng một mảng các số nguyên.

Bạn có thể lấy đầu vào từ STDIN, dưới dạng tên tệp hoặc tệp có tên bạn chọn; bạn có thể chọn cái nào Không có cách nào khác để có được đầu vào được cho phép.

Đầu vào sẽ chứa ít nhất một số nguyên. Bạn có thể giả sử tất cả các số nguyên là không âm và tổng tổng của chúng nhỏ hơn .232

05AB1E , 2 byte

|O

Giải trình:

|   Get input as array
 O  Sum

Hãy thử trực tuyến!

Bash + coreutils, 16 byte

xargs|tr \  +|bc

Hãy thử trực tuyến!

Có hai không gian sau \. Điều này làm việc cho số âm là tốt.

Giải trình:

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

Bạn có thể tự hỏi tại sao tr \\n +|bckhông tốt hơn, vì nó biến dòng mới trực tiếp thành '+'. Chà, có 2 lỗi không lường trước được:

• nếu đầu vào có một dòng mới, thì nó được chuyển thành dấu '+', do đó không có số nào sau nó để thực hiện phép cộng
• và vấn đề kỳ lạ nhất là bc yêu cầu một dòng mới sau đầu vào, nhưng bạn chỉ cần thay thế tất cả các dòng mới đầu vào bằng '+' s.

MATL , 2 byte

Us

Điều này mong đợi đầu vào trong một tệp văn bản được gọi là defin.

Gif hoặc nó đã không xảy ra :

Hoặc thử trực tuyến! ( cảm ơn Dennis vì đã thiết lập! )

Giải trình

Khi một chương trình MATL được chạy, nếu defintìm thấy một tệp được gọi (tên gọi là "đầu vào mặc định"), nội dung của nó sẽ được tự động tải dưới dạng văn bản và được đẩy vào ngăn xếp dưới dạng chuỗi trước khi thực thi mã.

Hàm Uđánh giá chuỗi để chuyển đổi nó thành một vectơ cột của các số và stính tổng, được hiển thị ngầm.

Japt , 2 byte

Nx

Giải trình

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

Hãy thử trực tuyến!

Dán + bc, 13 byte

paste -sd+|bc

Giải trình:

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

Một câu trả lời vỏ khác!

Perl 6 , 13 byte

say sum lines

Thử nó

Giải trình

• lines()trả về một danh sách các dòng từ $*INhoặc $*ARGFILESmột tay cầm đầu vào dòng lệnh ma thuật của Viking.
• sum(…)đã được thêm vào Perl 6 để cho phép [+] Listđược tối ưu hóa cho các Vị trí có thể tính tổng của chúng mà không tạo ra tất cả các giá trị của chúng như 1..100000
  (tôi chỉ nghĩ rằng sumở đây quá dễ thương để sử dụng [+]như tôi thường làm)
• say(…)gọi .gistphương thức trên đầu vào của nó và in nó với một dòng mới bổ sung.

C, 53 byte

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

Python 3 , 28 byte

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

Lấy từ mẹo này . Tôi đã nói điều này sẽ không hoạt động trên Windows.

Hãy thử trực tuyến!

Võng mạc , 11 7 byte

-4 cảm ơn Martin Ender

.*
$*
1

Hãy thử trực tuyến!

Chuyển đổi sang đơn nguyên:

.*
$*

Đếm số 1s:

1

Brain-Flak , 20 byte

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

Hãy thử trực tuyến!

Giải trình

Đây là một giải đấu được thực hiện bởi Riley trong trò chuyện . Giải pháp của ông là:

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

Nếu bạn quen thuộc với Brain-Flak thì điều này khá tự giải thích. Nó đẩy chiều cao ngăn xếp và bật một giá trị khi nó đếm ngược, cuối cùng, nó đẩy tổng của tất cả các lần chạy.

Đây là một môn đánh gôn khá tốt nhưng anh ta đánh bại cả hai {}và ([])tuy nhiên những điều này sẽ có một giá trị chỉ khác nhau một vì vậy nếu thay vào đó chúng ta gỡ mặt nạ ra và làm một trong hai tiêu cực thì họ gần như sẽ hủy bỏ.

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

Vì chúng luôn khác nhau bởi một nên chúng ta có một trường hợp không may là câu trả lời của chúng ta luôn bị tắt bởi chiều cao ngăn xếp. Để khắc phục điều này, chúng tôi chỉ cần di chuyển điểm bắt đầu của cú đẩy để bao gồm chiều cao ngăn xếp đầu tiên.

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

Python 2, 40 byte

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

R, 11 byte

sum(scan())

scanlấy đầu vào, một số trên mỗi dòng. Và sum, tốt, số tiền.

Perl 5 , 9 byte

8 byte mã + -pcờ.

$\+=$_}{

Hãy thử trực tuyến!

Với -p, đầu vào được đọc một dòng tại một thời điểm, được lưu trữ $_mỗi lần. Chúng tôi sử dụng $\như bộ tích lũy, vì nhờ -pcờ, nó được in ngầm ở cuối. Không thể so sánh }{được sử dụng để -pcờ chỉ in $\một lần ở cuối thay vì in $_và $\ở mỗi dòng, nó đọc như bình thường.

Pure Bash, 37 36 byte

Cảm ơn @KevinCruijssen cho một byte!

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

Hãy thử trực tuyến!

Haskell, 32 byte

interact$show.sum.map read.lines

Hãy thử trực tuyến! .

interactthu thập toàn bộ đầu vào từ stdin, chuyển nó đến hàm được đưa ra làm đối số của nó và in chuỗi nó lấy lại từ hàm này. Chức năng là:

            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 byte

<?=array_sum(file(t));

Giả định này có một tệp có tên "t" với danh sách các số nguyên.

file()mở một tệp và trả về một mảng với mỗi dòng được lưu trữ một phần tử riêng trong mảng. array_sum()tổng hợp tất cả các yếu tố trong một mảng.

Awk, 19 byte

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

Giải trình:

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

dc , 14 byte

0[+?z2=a]dsaxp

Hãy thử trực tuyến!

Giải trình:

 [      ] 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 byte

q~]1b

Hãy thử trực tuyến!

Làm thế nào nó hoạt động

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 byte

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

Trong python, các tập tin được mở bằng open('filename')(rõ ràng). Họ, tuy nhiên, lặp đi lặp lại. Mỗi lần bạn lặp qua tệp, bạn sẽ nhận được dòng tiếp theo. Vì vậy, bản đồ lặp đi lặp lại qua từng danh sách, gọiint nó và sau đó tổng hợp danh sách kết quả.

Gọi với tên tệp là đầu vào. (I Ef('numbers.txt') )

8 byte được lưu bằng cách sử dụng map(int, open(n))thay vì hiểu danh sách. Mã gốc:

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

Toán học, 19 byte

Giả sử môi trường máy tính xách tay của Mathicala.

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

Dự kiến ​​đầu vào là trong một tập tin a.

Thạch , 9 8 byte

ƈFпFỴVS

STDIN không thực sự là thứ của Jelly ...

Hãy thử trực tuyến!

Làm thế nào nó hoạt động

ƈ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 byte

ṇịᵐ+

Hãy thử trực tuyến!

Giải trình

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

Bash tinh khiết, 30

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

Hãy thử trực tuyến.

• reads tập tin đầu vào trong một đi vào biến b. -d_nói readrằng dấu phân cách dòng _thay vìnewline
• ${b//'newline'/+}thay thế các dòng mới trong bbằng+
• echo $[ ... ] đánh giá một cách hợp lý biểu thức kết quả và đưa ra nó.

Vim, 16 byte / tổ hợp phím

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

Vì V tương thích ngược, bạn có thể dùng thử trực tuyến!

Bình thường , 3 byte

s.Q

Hãy thử trực tuyến!

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

jq , 5 byte

add, cộng với cờ dòng lệnh -s.

Ví dụ:

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

Trên thực tế , 2 byte

kΣ

Hãy thử trực tuyến!

Giải trình:

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)

đc, 22

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

Điều này có vẻ khá dài hơn nó nên, nhưng thật khó để quyết định khi nào kết thúc tập tin. Cách duy nhất tôi có thể nghĩ để làm điều này là kiểm tra độ dài ngăn xếp sau ?lệnh.

Hãy thử trực tuyến .

[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

Lưu ý macro mđược gọi đệ quy. Hiện đại dcthực hiện đệ quy đuôi cho loại điều này, vì vậy không có lo lắng về việc tràn chồng.

Pyke , 4 byte

zbrs

Hãy thử trực tuyến!

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