uses StrUtils;
var s : String = '1234567';
begin
    WriteLn(Numb2USA(s));
end;