var
s:string;//存水果名稱
v:real;//水果單價
n,m:longint;//n為數量，m為總價
begin
readln(s);//讀入水果名
readln(v,n);//讀入單價，數量
m:=trunc(v*n);//截尾算出總價
writeln(s,' ',v:0:2,' ',n,' ',m);//輸出，註意限制場寬
end.
手打不易，望采納，謝謝。