定點型別（普通）

定點型別定義指定增量和範圍。它們共同描述了實際值應該如何精確地近似，因為它們由 2 的冪表示，而不是使用浮點硬體。

Shoe_Ounce : constant := 2.54 / 64.0;
type Thickness is delta Shoe_Ounce range 0.00 .. 1.00;

Strop : Thickness := 0.1;  -- could actually be 0.09375