m:-readln([A,B]),format("~d
",A*B-A-B),m.