var m,n:byte;begin repeat read(m,n);writeln(m*n-m-n)until 0>0end.