# dice di quanti elementi e' costituito un array frame .f text .f.text pack .f.text pack .f set vett(0) 5 set vett(1) 7 set vett(2) 9 set lungh [array size vett] .f.text insert end $lungh
size.tcl