Put_Line (" -0 > biggest negative " & Boolean'Image (NZero > Float'Pred (Zero))); -- Validness checks Put_Line ("Valid -oo is " & Boolean'Image ...
確定! 回上一頁