Tcl - While Loop

UN while L'istruzione loop in linguaggio Tcl esegue ripetutamente un'istruzione target fino a quando una data condizione è vera.

Sintassi

La sintassi di a while loop in linguaggio Tcl è -

while {condition} {
   statement(s)
}

Qui, statement(s)può essere una singola istruzione o un blocco di istruzioni. Ilconditionpuò essere qualsiasi espressione e true è qualsiasi valore diverso da zero. Il ciclo itera mentre la condizione è vera.

Quando la condizione diventa falsa, il controllo del programma passa alla riga immediatamente successiva al ciclo.

Diagramma di flusso

Il punto da notare su whileloop è che il ciclo potrebbe non essere mai eseguito. Quando la condizione viene verificata e il risultato è falso, il corpo del ciclo verrà ignorato e verrà eseguita la prima istruzione dopo il ciclo while.

Esempio

#!/usr/bin/tclsh

set a 10

#while loop execution 
while { $a < 20 } { puts "value of a: $a"
   incr a
}

Quando il codice precedente viene compilato ed eseguito, produce il seguente risultato:

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19