RosettaCodeData/Task/Arrays/Tcl/arrays-1.tcl

12 lines
129 B
Tcl
Raw Permalink Normal View History

2025-06-11 20:16:52 -04:00
# empty list
set arr {}
2023-07-01 11:58:00 -04:00
2025-06-11 20:16:52 -04:00
# 10 integers
set arr [list 1 2 3 4 5 6 7 8 9 10 ]
2023-07-01 11:58:00 -04:00
2025-06-11 20:16:52 -04:00
lappend arr 11
lappend arr 12
puts stdout "$arr"