diff options
Diffstat (limited to 'src/examples/array.ft')
-rw-r--r-- | src/examples/array.ft | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/examples/array.ft b/src/examples/array.ft new file mode 100644 index 0000000..6f62940 --- /dev/null +++ b/src/examples/array.ft @@ -0,0 +1,13 @@ +program array +int dimension(10)::a +int::i + +do i=0,9 +a(i)=i*2 +end do + +do i=0,9 +print*,a(i) +end do + +end program array
\ No newline at end of file |