10 lines
279 B
Ada
10 lines
279 B
Ada
|
with Ada.Text_IO;
|
||
|
|
|
||
|
|
procedure Exponentation_Order is
|
||
|
|
use Ada.Text_IO;
|
||
|
|
begin
|
||
|
|
-- Put_Line ("5**3**2 : " & Natural'(5**3**2)'Image);
|
||
|
|
Put_Line ("(5**3)**2 : " & Natural'((5**3)**2)'Image);
|
||
|
|
Put_Line ("5**(3**2) : " & Natural'(5**(3**2))'Image);
|
||
|
|
end Exponentation_Order;
|