Implement placing the bombs

1 files changed, 4 insertions, 1 deletions

diff --git a/test.adb b/test.adb
index 268b1f1..401aeab 100644
--- a/test.adb
+++ b/test.adb
@@ -1,8 +1,11 @@
 with Text_IO; use Text_IO;
+with Ada.Strings.Fixed; use Ada.Strings.Fixed;
+with Ada.Strings; use Ada.Strings;
+
 
 procedure Test is
 begin
    for Index in 1..10 loop
-      Put_Line("Hello, World!");
+      Put_Line(Trim(Integer'Image(Index), Left));
    end loop;
 end;