program p16N1;
{$APPTYPE CONSOLE}
var a,c:real;
    b:integer;
begin
  writeln('vvedit skiki portsiy na odnomy obidi, ta skiki (gram) kartopli ide na odnu port-siyu');
  readln(a,b);
  c:=a*b;
  c:=c/1000;
  writeln('na odun obid ide ',c:5:2,'(kg) kartopli');
  readln;
end.