A proč to pole definuješ jako:pole:array[1..1000000] of integer;když pak přistupuješ k prvku nula, který neexistuje?