#1.Find the greatest number among 3 numbers using tcl
set i 10
set j 30
set k 20
if {$i>$j && $i>$k} {
puts “i is greatest :$i” } elseif {$j>$k && $j>$i} {
puts “j is the greatest :$j” } else {
puts “k is the greatest” }
#2.Take an array and find the minimum and maximum using tcl
set a(0) 10
set a(1) 30
set . . . → Read More: logical programs in tcl
Recent Comments