RosettaCodeData/Task/Arrays/Fortran/arrays-27.f

2 lines
42 B
Forth

a (:) = (/1, 2, 3, 4, 5, 6, 7, 8, 9, 10/)