//38program test;var i:byte;begin for i:=0 to 15 do begin writeln( binstr(i,8) ); //2进制 writeln( octstr(i,8) ); //8进制 writeln( hexstr(i,8) ); //16进制 writeln; end;end.
本文共 231 字，大约阅读时间需要 1 分钟。
//38program test;var i:byte;begin for i:=0 to 15 do begin writeln( binstr(i,8) ); //2进制 writeln( octstr(i,8) ); //8进制 writeln( hexstr(i,8) ); //16进制 writeln; end;end.
转载于:https://www.cnblogs.com/xin-le/p/3980613.html