Noooo, Nok, como vas a hablar asi del Pascal, que hasta tiene el bucle:
repeat ... until
Mas respeto
<table width="100%" border="0" cellspacing="0" cellpadding="2"><tr><td align="center"><a href="http://www.cicpm.org" target="_blank"><img src="http://www.amsystems.com.ar/imagenes/fw/firma2.gif" border="0"></a></td></tr></table>