while 0<1do
Scanf.scanf"%d %d "(fun x y->Printf.printf"%d
"(x*y-x-y))done