while(m:?read(?-,?-,~))#~do dispterms(sum((m-i)*(n-i),i,0,min(m,n:?read())-1));