[dec]

Hola,

En Delphi, por lo menos, contamos con el "repeat ... until", que vendría a ser parecido al "do ... while", en cuanto a que se entra primero en el bucle y luego se valora cierta condición para determinar si se sale del mismo o no.