10.08.2009, 05:53
общий
это ответ
Здравствуйте, Ципихович Эндрю.
Пусть Arr() будет ваш массив.
При вводе элементов организуем два цикла: первый для заполнения элементов массива , второй для проверки текущего элемента массива с ранее введенными
...
for i=lbound(Arr) to ubound(Arr) ' lbound и ubound функции, возвращающие меньший и больший индексы вашего массива
...
[присваивание элементу Arr(i) значение]
For j=lbound(Arr) to i-1 ' i-1 имеет смысл чтобы не ставнивать текущий с самим собой
if Arr(i)=Arr(j) then
... 'здесь вы можете выполнять любое действие от приращения счетчика повторных значений до повторного ввода значения ...
end if
next
next