2 lines
67 B
Forth
2 lines
67 B
Forth
integer :: i
|
|
integer, dimension (10) :: a = (/(i * i, i = 1, 10)/)
|
integer :: i
|
|
integer, dimension (10) :: a = (/(i * i, i = 1, 10)/)
|