8 lines
142 B
Ada
8 lines
142 B
Ada
|
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;
|
||
|
|
|