Differenze tra le versioni di "REPEAT - UNTIL"

Da Gambas-it.org - Wikipedia.
Riga 16: Riga 16:
 
     Print i
 
     Print i
 
     Inc i
 
     Inc i
   <FONT Color=#B22222>Until</font> i = 10  <FONT Color=gray>' ''Se "i" non è uguale a 10, allora il ciclo si ripete</font>
+
   <FONT Color=#B22222>Until</font> i = 10  <FONT Color=gray>' ''Se "i" è uguale a 10, allora si esce dal ciclo; altrimenti il ciclo è ripetuto</font>
 
    
 
    
 
   Print i
 
   Print i
 
    
 
    
 
  '''End'''
 
  '''End'''
 +
In sostanza la logica di questo ciclo è considerando l'esempio di sopra: ''ripete il ciclo fino a che il valore della variabile "i" non diventa uguale a 10''.
  
  
Riga 35: Riga 36:
 
     Print i
 
     Print i
 
     Inc i
 
     Inc i
   <FONT Color=#B22222>Loop Until</font> i = 10  <FONT Color=gray>' ''Se "i" non è uguale a 10, allora il ciclo si ripete</font>
+
   <FONT Color=#B22222>Loop Until</font> i = 10  <FONT Color=gray>' ''Se "i" è uguale a 10, allora si esce dal ciclo; altrimenti il ciclo è ripetuto</font>
 
    
 
    
 
   Print i
 
   Print i

Versione delle 10:06, 5 mar 2017

Il ciclo Repeat...Until, la cui sintassi è:

Repeat
  ......
Until condizione

viene ripetuto fino a quando condizione risulta falsa: se condizione è falsa, allora il ciclo viene ripetuto.

Poiché la verifica di condizione è posta e dunque avviene in fondo al ciclo, esso viene compiuto almeno una volta a prescindere dal risultato di condizione.


Mostriamo un esempio pratico:

Public Sub Main()
 
 Dim i As Integer
 
  Repeat
    Print i
    Inc i
  Until i = 10   ' Se "i" è uguale a 10, allora si esce dal ciclo; altrimenti il ciclo è ripetuto
  
  Print i
  
End

In sostanza la logica di questo ciclo è considerando l'esempio di sopra: ripete il ciclo fino a che il valore della variabile "i" non diventa uguale a 10.


Equivalenza tra il ciclo Repeat...Unitil ed il ciclo Do...Loop Until

Al posto del ciclo Repeat...Until è possibile utilizzare il ciclo Do...Loop Until, il quale si comporta esattamente come il ciclo Repeat...Until.


Mostriamo un esempio pratico:

Public Sub Main()
 
 Dim i As Integer
 
  Do
    Print i
    Inc i
  Loop Until i = 10   ' Se "i" è uguale a 10, allora si esce dal ciclo; altrimenti il ciclo è ripetuto
  
  Print i
  
End

Pertanto il ciclo composto dalle parole-chiave Repeat...Unitil è equivalente al ciclo composto dalle parole-chiave Do...Loop Until.