Anonymous user
Create a two-dimensional array at runtime: Difference between revisions
Create a two-dimensional array at runtime (view source)
Revision as of 02:24, 9 April 2009
, 15 years agono edit summary
No edit summary |
|||
Line 383:
p arr[1][3]
=={{header|Tcl}}==
{{works with|Tcl|8.5}}
<lang tcl>package require Tcl 8.5
puts "enter dimension:"
set dim1 [gets stdin]
puts "enter dimension:"
set dim2 [gets stdin]
set l [lrepeat $dim1 [lrepeat $dim2 {}]]
lset l end end aValue
puts [lindex $l end end]
unset l</lang>
=={{header|Toka}}==
| |||