-module a. -export[m/0]. m()->case io:fread('',"~d~d")of{_,[A,B]}->io:format("~p ",[A*B-A-B]),m();_->0end.
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page