foreach a\ b [read stdin] {puts [expr $a*$b-$a-$b]}