stalker-ust, Вот. Надеюсь поможет. Проверку того что число не входит в множество, я не делал.
Код:

#include <iostream>
using namespace std;
int main()
{
int size; // Размер массива
int *array; // Наш динамический массив
int num, // Вводимое числ для проверки в массиве
z;
// Запрашиваем ввод размера массива
cout << " Введите размер массива = ";
cin >> size;
// Проверяем, пока введённое число меньше 1
// предлагать ввод правильного значения
while(size < 1){
cout << " Введите размер массива = ";
cin >> size;
}
// Создаём массив
array = new int[size];
// Заполняем массив, вводом чисел с клавиатуры
for(int i = 0; i < size; i++){
cout << "Введите значение в массив, элемент array[" << i << "] = ";
cin >> array[i];
}
// Предлагаем пользователю ввести любое число
// Его мы будем проверять на наличие присутствующих
// чисел в массиве.
cout << "Введите любое целое число = ";
cin >> num;
// Проверяем, если ведённое число есть в массиве
// Выводим число и индекс массива
for(int j = 0; j < size; j++)
if(array[j] == num)
cout << "Введённое число: " << num << " находится в массиве array[" << j << "]" << endl;
delete [] array; // Освобождаем память
cin >> z;
return 0;
}
P.S. Результат перевода на Pascal жду в этой теме.
