Not(X) or not(X or Y) or not(Y and not(X and Y))
Not (X) or not (X or Y) or not(Y) or not(X and Y)
Not (X) or (not(X) and not(Y)) or (not(Y) or not(X and Y))
Not (X) or (not(X) and not(Y)) or (not(Y) or not(X) or not(Y))
not(Y) or not(X)
var n,i,s,k:integer;
Begin
for i:=1 to 7 do Begin
read(n);
if n>0 then k:=k+1;
if n<0 then s:=s+n;
end;
writeln(k,s);
End.