Rounding in Tcl

Question

How can I round off a decimal number to the nearest integer in Tcl?

For example, if I enter

• 12.34 as input, the desired output is 12
• 12.45 as input, the desired output is 12
• 12.50 as input, the desired output is 13
• 12.57 as input, the desired output is 13

and so on

Answer 1

Take a look at the documentation for the expr command and for the round function.

Basically, it's

expr {round($myNum)}