﻿var a: integer; b: real;
begin
  for a := 1 to 10 do
  begin
    b := a * 0.453;
    writeln(a, ' фт. = ', b:0:3, ' кг');
  end;
end.
