输出格式
program e999;
const
a = 10.65;
b = 15.245;
c = 21.386;
st = 'ABCDEFGHIJKLMNOPQRSTUVWXY';
begin
writeln(st, st, st);
writeln(a, b , c);
writeln();
writeln(st);
writeln(a:10);
writeln(st);
writeln(b);
writeln(st);
writeln(c:14);
writeln();
writeln(st);
writeln(a:5:1, b:8:2, c:0:0);
end.
在 Free Pascal 下运行结果是:
ABCDEFGHIJKLMNOPQRSTUVWXYABCDEFGHIJKLMNOPQRSTUVWXYABCDEFGHIJKLMNOPQRSTUVWXY
`1.0650000000000000E+0001 1.5245000000000000E+0001 2.1386000000000000E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`1.1E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`1.5245000000000000E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`2.13860E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`10.6 15.2521
有一点搞不懂,最后一个输出语句中,双场宽输出小数,当小数位数不够时不是应当四舍五入吗?为什么b的输出四舍五入了,但a的没有?
const
a = 10.65;
b = 15.245;
c = 21.386;
st = 'ABCDEFGHIJKLMNOPQRSTUVWXY';
begin
writeln(st, st, st);
writeln(a, b , c);
writeln();
writeln(st);
writeln(a:10);
writeln(st);
writeln(b);
writeln(st);
writeln(c:14);
writeln();
writeln(st);
writeln(a:5:1, b:8:2, c:0:0);
end.
在 Free Pascal 下运行结果是:
ABCDEFGHIJKLMNOPQRSTUVWXYABCDEFGHIJKLMNOPQRSTUVWXYABCDEFGHIJKLMNOPQRSTUVWXY
`1.0650000000000000E+0001 1.5245000000000000E+0001 2.1386000000000000E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`1.1E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`1.5245000000000000E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`2.13860E+0001
ABCDEFGHIJKLMNOPQRSTUVWXY
`10.6 15.2521
有一点搞不懂,最后一个输出语句中,双场宽输出小数,当小数位数不够时不是应当四舍五入吗?为什么b的输出四舍五入了,但a的没有?


浙公网安备 33010602011771号