Data commit

Task/Integer-sequence/Pascal/integer-sequence-1.pas

@@ -0,0 +1,9 @@
+Program IntegerSequenceLimited;
+var
+  Number: QWord = 0; // 8 bytes, unsigned: 0 .. 18446744073709551615
+begin
+  repeat
+    writeln(Number);
+    inc(Number);
+  until false;
+end.

Task/Integer-sequence/Pascal/integer-sequence-2.pas

@@ -0,0 +1,15 @@
+Program IntegerSequenceUnlimited;
+
+uses
+  gmp;
+
+var
+  Number: mpz_t;
+
+begin
+  mpz_init(Number); //* zero now *//
+  repeat
+    mp_printf('%Zd' + chr(13) + chr(10), @Number);
+    mpz_add_ui(Number, Number, 1); //* increase Number *//
+  until false;
+end.