RosettaCodeData/Task/Array-length/SNOBOL4/array-length.sno

8 lines
172 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
ar = ARRAY('2,2')
ar<1,1> = 'apple'
ar<1,2> = 'first'
ar<2,1> = 'orange'
ar<2,2> = 'second'
OUTPUT = IDENT(DATATYPE(ar), 'ARRAY') PROTOTYPE(ar)
end