program m1 ;
var i , x : integer ;
C: array[0..20] of integer;
begin
randomize;
x := 0 ;
for i := 1 to 20 do
C[i] := random(152) - 64 ;
writeln(C[i]) ;
x := x + C[i] ;
write(x);
end.
program m1 ;
var i , x : integer ;
C: array[0..20] of integer;
begin
randomize;
x := 0 ;
for i := 1 to 20 do
C[i] := random(152) - 64 ;
for i := 1 to 20 do
writeln(C[i]) ;
for i := 1 to 20 do
x := x + C[i] ;
write(x);
end.