Хотя бы как так.
Код
readln(n);
for i:=1 to n do
begin
  summ:=0;
  for j:=1 to n do
  begin
    read(tval);
    summ:=summ + tval;
  end;
  writeln(summ);
end;