如何在 Pascal 中缩短数据类型 "real"

How to make data type "real" shorter in Pascal

我的程序将毫米转换为米和厘米。它正在工作,但答案就像 1,394900000000000000...如何缩短它?

Program radiuss;
var 

mill : real;
metr : real;
cent : real;

Begin
Writeln('Сколько миллиметов надо перевести?');
Readln(mill);

metr := mill * 0.001;
cent := mill * 0.1;

Writeln('Метры:', metr);
Writeln('Сантиметры:', cent);

End.

您可以在 writeln 中指定要打印小数部分的位数。以下是如何分别打印 3 位和 1 位数字的示例:

Writeln('Метры:', metr:0:3);
Writeln('Сантиметры:', cent:0:1);