Data update

2026-02-01 16:33:20 -08:00 · 2026-02-01 16:33:20 -08:00 · 4bb20c9b71
commit 4bb20c9b71
parent 5150844a7d
7735 changed files with 38060 additions and 199180 deletions
--- a/Task/Reverse-a-string/Ada/reverse-a-string.ada
+++ b/Task/Reverse-a-string/Ada/reverse-a-string.ada
@ -1,14 +0,0 @@
-with Ada.Text_IO; use Ada.Text_IO;
-
-procedure Reverse_String is
-   function Reverse_It (Item : String) return String is
-      Result : String (Item'Range);
-   begin
-      for I in Item'range loop
-         Result (Result'Last - I + Item'First) := Item (I);
-      end loop;
-      return Result;
-   end Reverse_It;
-begin
-   Put_Line (Reverse_It (Get_Line));
-end Reverse_String;