Mode:
Duration:
1
2
3
4
5
set fact 1
for {set i 1} {$i <= 5} {incr i} {
set fact [expr {$fact * $i}]
}
puts "Factorial: $fact"Coding works best on desktop or with an external keyboard.
set fact 1
for {set i 1} {$i <= 5} {incr i} {
set fact [expr {$fact * $i}]
}
puts "Factorial: $fact"Coding works best on desktop or with an external keyboard.
Calculates factorial of 5 using a loop.
set fact 1
for {set i 1} {$i <= 5} {incr i} {
set fact [expr {$fact * $i}]
}
puts "Factorial: $fact"Tcl (Tool Command Language) is a lightweight, embeddable scripting language known for its simplicity, extensibility, and tight integration with the Tk GUI toolkit. It is widely used for rapid prototyping, automation, testing, GUI development, and embedded systems.
Origin & Creator
Tcl was created in 1988 by John Ousterhout at the University of California, Berkeley, as a reusable command language for embedded applications.
Industrial Note
Tcl is widely used in EDA (Electronic Design Automation), semiconductor testing, network device scripting, hardware validation, custom tool automation, and legacy financial systems.