整数と浮動小数点数を書式化して表示

明解C言語 入門編 > 2. 演算と型 >

整数と浮動小数点数を書式化して表示

Delphi


program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;
begin
write(format('[%d]'#13#10, [123]));
write(format('[%.4d]'#13#10, [123]));
write(format('[%4d]'#13#10, [123]));
write(format('[%04d]'#13#10, [123]));
write(format('[%-4d]'#13#10#13#10, [123]));

write(format('[%d]'#13#10, [12345]));
write(format('[%.3d]'#13#10, [12345]));
write(format('[%3d]'#13#10, [12345]));
write(format('[%03d]'#13#10, [12345]));
write(format('[%-3d]'#13#10#13#10, [12345]));

write(format('[%f]'#13#10, [123.45]));
write(format('[%.1f]'#13#10, [123.45]));
write(format('[%4.1f]'#13#10, [123.45]));
write(format('[%10.10f]'#13#10#13#10, [123.45]));
end.

実行結果

S:\>lesson015\project1.exe
[123]
[0123]
[ 123]
[ 123]
[123 ]

[12345]
[12345]
[12345]
[12345]
[12345]

[123.45]
[123.5]
[123.5]
[123.4500000000]