帕斯卡三位数实数

4 freepascal digit

我有 Free pascal 代码,我有来自 a/b 的实数 3.285714287142857E+000。

program threedigits;
var a,b:real;

begin
a:=23;
b:=7;
writeln(a/b);
end.
Run Code Online (Sandbox Code Playgroud)

如何将逗号后的数字更改为三位数(3.286)?

小智 6

使用0:3

var a,b:real;

begin
a:=23;
b:=7;
writeln(a/b:0:3);

readln;
end.
Run Code Online (Sandbox Code Playgroud)