Originariamente inviato da cso
ma così accetta pure valori maggiori di quelli allocato nella memoria per gli array!!!!!
Facendo così sfondi l'array...se fosse java ti direbbe array out of bounds...ma pascal non ti fa vedere nessun messaggio di errore ma ciò non è meno grave, anzi!!!!

Naturalmente scherzavo per la lemon-soda
una ombra di vino va più che bene
???

do

....

while ( (elementi > n) or (elementi < 0) )

esegue il corpo del do-while quando elementi è minore di 0 o maggiore del numero massimo consentito di valori che puo' contenere l'array : quindi permette di rileggere il valore di elementi nel caso non fosse valido!

Posto che il ciclo iterativo repeat-until è come un do-while fai le tue considerazione...!