10 lines
186 B
Ada
10 lines
186 B
Ada
|
with Ada.Integer_Text_IO; use Ada.Integer_Text_IO;
|
||
|
|
|
||
|
|
procedure Test_Literals is
|
||
|
|
begin
|
||
|
|
Put (16#2D7#);
|
||
|
|
Put (10#727#);
|
||
|
|
Put (8#1_327#);
|
||
|
|
Put (2#10_1101_0111#);
|
||
|
|
end Test_Literals;
|