La siguiente tabla muestra todos los operadores aritméticos compatibles con el lenguaje Tcl. Suponga que la variable 'A' tiene 10 y la variable 'B' tiene 20, entonces -
Operador |
Descripción |
Ejemplo |
+ |
Agrega dos operandos |
A + B dará 30 |
- |
Resta el segundo operando del primero |
A - B dará -10 |
* |
Multiplica ambos operandos |
A * B dará 200 |
/ |
Divide el numerador por el numerador |
B / A dará 2 |
% |
Operador de módulo y resto de después de una división entera |
B% A dará 0 |
Ejemplo
Pruebe el siguiente ejemplo para comprender todos los operadores aritméticos disponibles en el lenguaje Tcl:
#!/usr/bin/tclsh
set a 21
set b 10
set c [expr $a + $b]
puts "Line 1 - Value of c is $c\n"
set c [expr $a - $b]
puts "Line 2 - Value of c is $c\n"
set c [expr $a * $b]
puts "Line 3 - Value of c is $c\n"
set c [expr $a / $b]
puts "Line 4 - Value of c is $c\n"
set c [expr $a % $b]
puts "Line 5 - Value of c is $c\n"
Cuando compila y ejecuta el programa anterior, produce el siguiente resultado:
Line 1 - Value of c is 31
Line 2 - Value of c is 11
Line 3 - Value of c is 210
Line 4 - Value of c is 2
Line 5 - Value of c is 1