program Project2;

{$APPTYPE CONSOLE}

var
a:array [1..10000] of integer;
s,n,i:integer;
f1,f2:text;
begin
assign(f1,'input.txt');
reset(f1);
s:=0;
readln(f1,n);
for i:=1 to n do
s:=s+a[i];
close(f1);
assign(f2,'output.txt');
rewrite(f2);
writeln(f2,s);
close(f2);
end.