массив цикл-пока или цикл-до в PascalABC

[veronika55214]

Дан целочисленный массив размера N. Если он является перестановкой, то есть содержит все числа от 1 до N, то вывести 0, в противном случае вывести номер первого недопустимого элемента.

[Serge_Bliznykov]

покажите, как Вы описываете и заполняете массив?

а, насколько я понимаю условия задачи, задачка очень проста.
возникает только вопрос неоднозначности формулировки "первого" недопустимого элемента. Что есть "первый" недопустимый элемент в понимании автора задачи, сие только ему и ведомо!
например, пусть N = 4
есть массив {3, 4, 1, 4 }
Какой номер у первого недопустимого элемента?
а в массиве
{4, 3, 7, 2}
какой номер первого недопустимого элемента?

Поэтому, либо, если возможно, уточняйте у преподавателя, либо, интерпретируйте это так, как Вам понятнее и проще.

например, могу предложить такой вариант.
вводим ДОПОЛНИТЕЛЬНЫЙ массив такой же размерности.
заполняем его числами от 1 до N
далее в цикле идём по исходному массиву A. Каждое число A[i] проверяем, что оно входит в диапазон [1..N] - если нет, то: стоп-машина - нашли первый недопустимый элемент. Если число в нужном диапазоне, то проверяем наличие данного числа в доп массиве (по его номеру. Если в доп массиве на позиции, равной проверяемому числу стоит это число, то всё хорошо. Заменяем число в доп.массиве на нолик (признак, что число отработано). Если же на позиции в доп.массиве УЖЕ ноль (это признак, что данное число встречалось в проверяемом массиве ранее) - то: стоп-машина - нашли первый недопустимый элемент.
как-то так...

[Poma][a]

вводим ДОПОЛНИТЕЛЬНЫЙ массив такой же размерности.
заполняем его числами от 1 до N

Не понял.. Массив-то зачем? Почему бы просто не :

i := 1;
while Condition(i) and (i <= n) do Inc(i);
WriteLn(i mod (n+1));

[Serge_Bliznykov]

Сообщение от Poma][a

Не понял.. Массив-то зачем? Почему бы просто не :

i := 1;
while Condition(i) and (i <= n) do Inc(i);
WriteLn(i mod (n+1));

для того, чтобы найти в заданном массиве первое не подходящее число.
Заметьте, не число, которого нет, а

номер первого недопустимого элемента.

посмотрите на приведённые выше мной примеры. Постарайтесь найти в массиве номер первого не подходящего числа.

[Poma][a]

Ладно.. Тогда я за множество..

[Serge_Bliznykov]

Сообщение от Poma][a

Ладно.. Тогда я за множество..

ну, это уже лучше!

можно и так.
ведь ограничение размерности N в 255 элементов вполне допустимо (имхо).

[Poma][a]

Вариант без доп памяти.. Сортировка! (Пусть кусок.. N*logN.. и потом еще пробежка по массиву..) Можно еще цикл в цикле.. но там будет хуже..

ну, это уже лучше!

Стараемся

ведь ограничение размерности N в 255 элементов вполне допустимо (имхо).

Как утверждает поисковик, ограничения на N - 10..

[BDA]

Poma][a, при сортировке нужно будет еще запоминать исходную позицию числа в массиве.

[Poma][a]

Poma][a, при сортировке нужно будет еще запоминать исходную позицию числа в массиве.

Не понял..

есть массив {3, 4, 1, 4 }

Сортируем, получаем 1, 3, 4, 4

И тут уже выводим или 2 или 4 или что-то еще..

UPDATE
Прозрел.. Мы должны выводить №элемента.. надо все же читать условия..