ac1023.pas

某牛人写的acm.tongji.edu.cn上大部分ac的代码,仅供学习研究,请不要用来作弊

program tju1023;
var
  t,i,n,m,a,j:longint;
begin
  read(t);
  for i:=1 to t do begin
    read(n,m);if n>m then begin a:=n;n:=m;m:=a;end;
    a:=0;
    for j:=1 to n do
      inc(a,j*(j+m-n));
    writeln(a,' ',n*(n+1)*m*(m+1) div 4-a);
  end;
end.