A-M baby

Task/Integer-sequence/Fortran/integer-sequence.f

@@ -0,0 +1,13 @@
+program Intseq
+  implicit none
+
+  integer, parameter :: i64 = selected_int_kind(18)
+  integer(i64) :: n = 1
+
+! n is declared as a 64 bit signed integer so the program will display up to
+! 9223372036854775807 before overflowing to -9223372036854775808
+  do
+    print*, n
+    n = n + 1
+  end do
+end program