Tcl - Operadores Aritméticos

A tabela a seguir mostra todos os operadores aritméticos suportados pela linguagem Tcl. Suponha que a variável 'A' contenha 10 e a variável 'B' contenha 20, então -

Operador	Descrição	Exemplo
+	Adiciona dois operandos	A + B dará 30
-	Subtrai o segundo operando do primeiro	A - B dará -10
*	Multiplica ambos os operandos	A * B dará 200
/	Divide numerador por de-numerador	B / A dará 2
%	Operador de módulo e o restante após uma divisão inteira	B% A dará 0

Exemplo

Tente o exemplo a seguir para entender todos os operadores aritméticos disponíveis na linguagem 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"

Quando você compila e executa o programa acima, ele produz o seguinte 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