-module(f). -export([m/0]). m()->case io:fread('',"~d~d")of{_,[A,B]}->io:format("~.2f ",[A*B/(A+B)]),m();_->0end.