zhangqq
2020,6,8
悦来
(Altair HyperWorks^{TM} 二次开发培训)
hypot(arg1, arg2)
求勾股定理第三边的函数
set a 3
set b 4
set c [expr {hypot($a, $b)}]
puts $c
输出：5.0
(为什么是浮点数?)
比较大小
有数值和字符串等比较，凡比较运算后均返回布尔值。
- 数字比较
set a 2
set b 2.0
set c [expr {$a == $b}]
puts $c
输出：1
说明整型和浮点型还是按照数值大小来比较的
- 字符串比较
set a Hello
set c [expr {$a eq "hello"}]; #也可以用 ==
puts $c
输出：0
(注意：TCL中一般字符串如果没有空格是可以不用引号引住的，但是在这里比较的时候，在expr内必须要用空格或是大括号括住字符串)