var a:real; b,c:longint; begin read(a); read(b); write(a:0:2,' ',b,' '); c:=trunc(a*b); write(c); end. /************************************************************** Problem: 1703 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/