4 lines
88 B
Tcl
4 lines
88 B
Tcl
|
puts [::tcl::mathop::+ {*}$1to5]
|
||
|
|
puts [::tcl::mathop::* {*}$1to5]
|
||
|
|
puts x,[join $1to5 ,]
|