delphi 7编程问题

来源：百度知道 编辑：UC知道 时间：2024/05/04 17:23:44
输入一个非整数f 以浮点数格式保留两位小数 占五位数输出

write(f:5:2)//5为总输出字符数,2为两位小数

完整代码Delphi7通过:

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;
var
f:real;
begin
write('请输入一个非整数:');
readln(f);
write(f:5:2);
readln;
end.