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