# Tcl - Arithmetic Operators

Following table shows all the arithmetic operators supported by Tcl language. Assume variable ‚ÄòA‚Äô holds 10 and variable ‚ÄòB‚Äô holds 20, then −

Operator Description Example
+ Adds two operands A + B will give 30
- Subtracts second operand from the first A - B will give -10
* Multiplies both operands A * B will give 200
/ Divides numerator by de-numerator B / A will give 2
% Modulus Operator and remainder of after an integer division B % A will give 0

## Example

Try the following example to understand all the arithmetic operators available in Tcl language −

```#!/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"
```

When you compile and execute the above program, it produces the following result −

```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
```
tcl_operators.htm