TP-programmation-imperative/tp_gps/premier_programme.adb
2023-06-10 21:03:54 +02:00

9 lines
210 B
Ada
Executable file

with Text_IO;
use Text_IO;
-- Programme minimal qui affiche juste un message.
procedure Premier_Programme in
begin
Put_Line ("Bravo ! Vous avez réussi à exécuter le programme.");
end Premier_Programme.