跳转到内容

Ada 编程/定界符/**

来自维基教科书,自由的教科书

Ada. Time-tested, safe and secure.
Ada。经受时间考验,安全可靠。

运算符

[编辑 | 编辑源代码]

标准运算

[编辑 | 编辑源代码]

算术幂

[编辑 | 编辑源代码]

"**" 运算符被定义为所有数值类型的算术幂。

function "**" (Left : T; Right : Integer) return T;
A : constant Float   := 5.0 ** 2;  -- A is now 25.0
B : constant Integer := 5 ** 2;    -- B is also 25
工作示例
[编辑 | 编辑源代码]
文件:operator_power.adb (查看, 纯文本, 下载页面, 浏览全部)
with Ada.Text_IO;

procedure Operator_Power is
   A : constant Float   := 5.0 ** 2;  -- A is now 25.0
   B : constant Integer := 5 ** 2;    -- B is also 25

   package T_IO renames Ada.Text_IO;
   package F_IO is new  Ada.Text_IO.Float_IO (Float);
   package I_IO is new  Ada.Text_IO.Integer_IO (Integer);

begin
   T_IO.Put ("A = ");
   F_IO.Put (
      Item => A,
      Fore => 3,
      Aft  => 1,
      Exp  => 0);
   T_IO.New_Line;
   T_IO.Put ("B = ");
   I_IO.Put (
      Item  => B,
      Width => 3,
      Base  => 10);
   T_IO.New_Line;
end Operator_Power;

维基教科书

[编辑 | 编辑源代码]

Ada 95 参考手册

[编辑 | 编辑源代码]

Ada 2005 参考手册

[编辑 | 编辑源代码]



Ada 运算符
and and then > + abs &
or or else >= - mod
xor = < * rem in
not /= <= ** / not in
华夏公益教科书