Data update

Task/Integer-sequence/Ada/integer-sequence-1.ada

@@ -1,9 +0,0 @@
-with Ada.Text_IO;
-procedure Integers is
-   Value : Integer := 1;
-begin
-   loop
-      Ada.Text_IO.Put_Line (Integer'Image (Value));
-      Value := Value + 1;  -- raises exception Constraint_Error on overflow
-   end loop;
-end Integers;

Task/Integer-sequence/Ada/integer-sequence-2.ada

@@ -1,7 +0,0 @@
-with Ada.Text_IO;
-procedure Positives is
-begin
-   for Value in Positive'Range loop
-      Ada.Text_IO.Put_Line (Positive'Image (Value));
-   end loop;
-end Positives;