digits(x)：有效二进制数字¶

有效的二进制数字。

声明¶

retval = digits(x)

x 输入值必须是实数或整数类型。

返回值是整数类型。

digits(x) 返回 x 的内部模型表示的有效二进制位数。

支持的参数类型是实数和整数。

program intrinsics_digits
	print *, digits(3.1)
end program

结果：