珠江船务公司:谁可一帮忙给写一下二进制的换算公式，最好在加几个实例，。

来源：百度文库 编辑：查人人中国名人网 时间：2024/07/06 13:28:24

我给出delphi的算法

function IntToBin(i: integer): string;
begin
Result:='';
while i <>0 do
begin
Result:=Format('%d'+result,[i mod 2]);
i:=i div 2;
end;
end;

实例如下，在窗体上放2个TEdit和一个TButton
procedure Button1Click(Sender:TObject);
begin
edit2.text:=IntToBin(StrToInt(edit1.text));
end;

就是把edit1中的十进制数转换成二进制并在edit2中显示出来

谁可一帮忙给写一下二进制的换算公式，最好在加几个实例，。 请问一下二进制是如何换算的 电工的换算公式 能否举点例子说明一下怎么换算成二进制，如8怎么换算成二进制？ 十进制与二进制的简便换算 谁能帮我写一些换算公式! 阴历阳历的换算公式 铝合金的重量换算公式 帮忙看一下这个公式的意思. 二进制换算十进制