A+B: Difference between revisions
Content added Content deleted
(→Tcl: Added implementation) |
(→{{header|Tcl}}: Added a one-liner; less clear IMO but still neat) |
||
| Line 210: | Line 210: | ||
<lang tcl>scan [gets stdin] "%d %d" x y |
<lang tcl>scan [gets stdin] "%d %d" x y |
||
puts [expr {$x + $y}]</lang> |
puts [expr {$x + $y}]</lang> |
||
Alternatively: |
|||
<lang tcl>puts [tcl::mathop::+ {*}[gets stdin]]</lang> |
|||