diff options
Diffstat (limited to 'test.adb')
-rw-r--r-- | test.adb | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -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; |