g | x | w | all
Bytes Lang Time Link
029AWK250909T155652Zxrs
004Thunno 2 S230527T162844ZThe Thon
038JavaScript V8230520T214109ZnaffetS
013GolfScript200118T012204Zuser8505
076Batch160329T204509ZNeil
045Octave160329T173817ZStewie G
008Pylongolf2160331T212920Zuser4701
008Japt160330T063214ZDennis
062Lua160330T092325ZKatenkyo
4100J160329T184141ZLeaky Nu
005GS2160329T230354ZDennis
005Jelly160329T162954Za spaghe
010Pyke160329T161533ZBlue
022R160329T181549ZMickyT
048Haskell160329T170048Znimi
006MATL160329T161212ZLuis Men
009Pyth160329T161759ZBlue
010Pyth160329T161403ZDenker
065C160329T165136ZmIllIbyt
054Python 3160329T161353ZCalculat
052Python 3160329T163511Zshooqie
00505AB1E160329T163253ZAdnan
010CJam160329T162719ZMartin E
009Minkolang 0.15160329T161939ZEl'e

AWK, 29 bytes

_++{for(;i++<NF;)x+=$i^2}$0=x

Attempt This Online!

Thunno 2 S, 4 bytes

sON²

Attempt This Online!

With normal I/O it would be 1 byte (with S flag):

²

Attempt This Online!

Explanation

sON²  # Implicit input
s     # Discard the first input
 O    # Split the second input on spaces
  N   # Convert each string to a number
   ²  # Square each number
      # Implicit output of the sum

JavaScript (V8), 38 bytes

x=>Math.hypot(...x.match(/\s\d+/g))**2

Try it online!

GolfScript, 13 bytes

Input is extremely easy for GolfScript.

~](;{.*}%{+}*

Try it online!

Explanation

~             # Take & Evaluate the input
 ]            # Wrap the whole input into a list
  (;          # Remove the first item
    {.*}%     # Map with squaring
         {+}* # Reduce by summation

Batch, 76 bytes

@set/px=
@set/px=
@set t=0
@for %%n in (%x%)do set/at+=%%n*%%n
@echo %t%

Octave, 45 bytes

Octave is not exactly designed for accepting random input formats. For instance, input over multiple lines is impossible. Also, numbers can't be entered as a list unless you have brackets. For that reason, the input must be taken as a string.

input('');disp((x=str2num(input('','s')))*x')

input('')                                     % Take the first input line and discard
                         input('','s')        % Take the second input as a string 
               x=str2num(input('','s'))       % Convert the string to a list of numbers, x
               (x=str2num(input('','s')))*x'  % Multiply x by x transposed
                                              % This is equivalent to sum(x.^2) but shorter
          disp((x=str2num(input('','s')))*x') % Display the result

Call it like this:

input('');disp((x=str2num(input('','s')))*x')
5
1 2 5 7 8
143

Pylongolf2, 8 bytes

c| n²+~

 

c  - read the input
|  - split by space (note the 1 space after |)
n  - convert all of that in the list to numbers
²  - Square everything in the list
+  - Sum everything in the list
~  - Print it

Japt, 8 bytes

Ns1 mp x

Try it in the Japt Interpreter.

How it works

The code is parsed as

N.s(1).m(p).x()

Lua, 74 62 Bytes

Edit: saved 8 bytes due to @KennyLau

It's quite straigthforward, skip the first line and iterate over the group of digits in the second.

i,x=io.read,0i()i():gsub("%d+",function(d)x=x+d*d end)print(x)

Ungolfed

x=0
i=io.read 
i()
i():gsub("%d+",function(d)
   x=x+d*d
end)
print(x)

J, 4 bytes + 100

+/*:

Try it.

   +/*:1 2 5 7 8
143

A +100 punishment in the byte-count to myself for not having standard input.

GS2, 5 bytes

W",Φd

Try it online!

How it works

W      Find all numbers in the input; push a list.
 "     Discard the first number.
  ,    Square.
   Φ   Map the last instruction over the list of numbers.
    d  Compute the sum of all squares.

Jelly, 5 bytes

ṣ⁶V²S

Try it online.

Input format is rather annoying....

Explanation

ṣ⁶V²S
ṣ⁶       split by space
  V      map eval over the resulting list -- the newline in the first element causes the first line to be treated as a separate link and ignored
   ²     map square over the list
    S    sum

Pyke, 10 bytes

;\ cFE2^)s

Takes input as requested

Try it here (Yay setup a try-it page!)

Or 5 bytes if allowed a list of ints:

2Rm^s

Or noncompeting (add squared node), 3 bytes

mXs

R, 22 bytes

Nothing very flash, handles the input as specified

cat(sum(scan()[-1]^2))

Test run

> cat(sum(scan()[-1]^2))
1: 5
2: 1 2 5 7 8
7: 
Read 6 items
143
> 

Haskell, 48 bytes

main=interact$show.sum.map((^2).read).tail.words

How it works:

interact                 read whole input, pass it to a function and
                         print it's return value. The function is:

               words     split at whitespace into words
           tail          drop first element (the number on line #1)
    map(       )         convert each word 
           read             to integers
       (^2)                 and square
  sum                    sum all values
show                     convert back to string

MATL, 6 bytes

xjU2^s

Try it online!

x    % take first input and throw it away
j    % take second input as a string
U    % convert to array with those numbers
2^   % element-wise square
s    % sum of array

Pyth, 9 bytes

s^R2re.z7

Try it here

Or 7 bytes if allowed to omit line 1

s^R2rz7

Pyth, 10 bytes

sm^sd2ce.z

Try it here!

Takes input in the exact same format as specified in the challenge.

Explanation

sm^sd2ce.z  # .z = input lines

       e.z  # only take the last line
      c     # split on spaces
 m          # map each number d
   sd       # convert to integer
  ^  2      # square
s           # sum all squares

Alterntive solutions with more generous input formats

8 bytes if I may omit the number count:

sm^sd2cz

Try it here!

4 bytes if I may take the input as list of integers:

s^R2

Try it here!

C,65 bytes

j,k;main(i){for(;scanf("%d",&i)+1;j++&&(k+=i*i));printf("%d",k);}

Python 3, 54 bytes

-[] thanks to shooqie

print(sum(int(i)**2for i in input(input()).split()))

Takes input as specified in the first version of the question.

So to answer your question: Not a lot.

Python 3, 52

i=input;print(sum(int(d)**2for d in i(i()).split()))

05AB1E, 5 bytes

Code:

²ð¡nO

Explanation:

²      # Take the second input, the first input is ignored
 ð¡    # Split on spaces
   n   # Square each element
    O  # Take the sum and implicitly output it

Uses CP-1252 encoding.

Try it online!

CJam, 10 bytes

l;l~]2f#1b

Test it here.

Explanation

l;   e# Read first line and discard.
l~   e# Read second line and evaluate, dumping all integers on the stack.
]    e# Wrap them in an array.
2f#  e# Square each.
1b   e# Sum.

Minkolang 0.15, 9 bytes

n[n2;+]N.

Try it here!

Explanation

n            Take number from input
 [    ]      Pop top of stack and repeat that many times
  n          Take number from input
   2;        Square it
     +       Add to top of stack
       N.    Output as number and stop.