8 lines
142 B
Ada
Executable file
8 lines
142 B
Ada
Executable file
with Ada.Integer_Text_IO;
|
|
|
|
procedure Afficher_Un_Entier (N: in Integer) is
|
|
begin
|
|
Ada.Integer_Text_IO.Put (N, 1);
|
|
end Afficher_Un_Entier;
|
|
|