Este ejercicio sirve para acostumbrarse a la sintaxis de oraciones simples en Tcl. Calculemos la media entre dos números con un decimal de exactitud:

% set a 45
45
% set b 56
56
% set media [expr ($a+$b)*1.0/2]
50.5

El comando set sirve para establecer variables y expr para evaluar expresiones matemáticas. Vemos que las variables se usan con el símbolo $. Multiplicamos por 1.0 para tener como respuesta un resultado en coma flotante. El valor de la operación está contenida en la variable $media, por ello la expresión va entre corchetes.