#290 Looping with foreach in tcl

# Looping with foreach
set numbers {1 2 3 4 5 6 7 8 9 10}
foreach x $numbers {
puts "x = $x"
}

#x = 1
#x = 2
#x = 3
#x = 4
#x = 5
#x = 6
#x = 7
#x = 8
#x = 9
#x = 10