Исключение Numeric_Error
Исключение Numeric_Error
Исключение Numeric_Error возбуждается в случае когда предопределенная численная операция не может предоставить математически корректный результатЭто может произойти при арифметическом переполнении, делении на нуль, а также не возможности обеспечить требуемую точность при выполнении операций с плавающей точкой.Следует заметить, что в Ada95 Numeric_Error переопределена таким образом, что является тем же самым, что и Constraint_Error.
| procedure Numeric_Demo is X : Integer; Y : Integer;begin X := Integer'Last; Y := X + X; -- вызывает Numeric_Error end Numeric_Demo; |
