Ошибка "Access violation"

[Rin]

Доброго времени суток, уважаемые). Начал изучать "С++. Освой на примерах.". Начал выполнять упражнения и столкнулся с ошибкой, которая в заголовке. Вот код:

PHP код:

/*Напишите программу, которая определит и выведет на экран один сомножитель
из N, который можно вычеркнуть из произведения 1!*2!*3!*...*N! так, чтобы
оставшееся произведение было точным квадратом */
#include <iostream.h>
#include <conio.h>
//---------------------------------------------------------------------------

int main()
{
  __int64* Array=0;
  int n,k; // n - число факториалов, К - номер сомножителя, который вырезаем
  __int64 multiplication; // выражение 1!*2!*3!*...*N! без К-того элемента массива
  bool breakdown=false;
  bool find=false;
  cout<<"vvedite N\n";
  cin>>n;
//выделение памяти
  Array=(__int64*) realloc(Array,sizeof(__int64)*n);
/*заполнение массива факториалами*/
  for (int i=1;i<=n;i++)
  {
    Array[i]=1;
    for (int j=1;j<=i;j++)
    {
      Array[i]=Array[i]*j;
    }
    cout<<i<<" element ="<<Array[i]<<"\n";
  }
 // поиск равенства
  for (int i=1;i<=100;i++) // i - число которое будем возводить в степень
  {
    k=1;
    while (k<=n) /* будем поочередно вырезать K-тый
элемент из массива, а все остальные перемножать (произведение заносим в multiplication) и 
сравнивать с i*i */
    {
      multiplication=1;
      for (int j=1;j<=n;j++) 
// тут происходит перемножение всех элементов, кроме К-того
      {
        multiplication=j==k ? multiplication : multiplication*Array[j];
// если произведение всех сомножителей, кроме первого, меньше полного квадрата
// i-того числа, значит полный квадрат "i+1" будет тоже больше произведения, и дальше
// производить поиск бесполезно
        if (multiplication<i*i&&k==1) breakdown=true;
      }
// собственно сравнение
      if (multiplication==i*i)
      {
       cout<<"i="<<i<<"; i*i="<<i*i;
       cout<<"; multiplication="<<multiplication<<"; k="<<k;
       cout<<"; Array[k]="<<Array[k]<<"\n";
       find=true; 
       }
      if (breakdown) break;
      k++;
    }
    if (breakdown) break;
  }
  if (find==false) cout << "Net takih\n";
// освобождение памяти 
 free(Array);
  getch();
} 


Не пойму, где косяк, ведь выделяю и освобождаю память под массив правильно. Юзаю Borland C++ Builder. Ось - Win 7.
Спасибо, что заглянули)). И ОГРОМНОЕ СПАСИБО за ответы.
UPD
Протрассировал прогу, ошибка вылетает после getch();

[OktXIV]

/*заполнение массива факториалами*/
for (int i=1;i<=n;i++)
{
Array[i]=1;
for (int j=1;j<=i;j++)
{
Array[i]=Array[i]*j;
}
cout<<i<<" element ="<<Array[i]<<"\n";
}

нумерация элементов начинается с 0 до n-1

[Rin]

Благодарю! Зависания по ночам с книгами меня когда-нибудь погубит). Как всегда туплю.

[Abstraction]

На самом деле, там не надо перемножать. Уже при N=8 результат не влезет в int, при N=10 не влезет и в __int64. Слишком быстро растущая функция для решения "в лоб".

[Rin]

Это лишь начало книги, главное было научиться использовать циклы, условные операторы, и выборку. 23! или 24! не влезет в int64. Можно использовать "long double", но и тут будет трабл, ибо в мантиссе значащих чисел лишь 20. Хоть это и просто упражнение, но интересно, как выкрутиться из этой ситуации?

[ArmanPrestige]

Сообщение от Abstraction

при N=10 не влезет и в __int64.

http://msdn.microsoft.com/en-us/libr...(v=vs.80).aspx

Maximum value for a variable of type __int64
9223372036854775807

[Abstraction]

ArmanPrestige, и что Вы хотите сказать? Теперь посчитайте 1!*2!*3!*...*10!. Элементарная оценка сверху скажет Вам, что это больше 2^78. Более того, можно оценить и результат при N=9, он тоже не влезает.

Можно использовать "long double", но и тут будет трабл, ибо в мантиссе значащих чисел лишь 20. Хоть это и просто упражнение, но интересно, как выкрутиться из этой ситуации?

Заведомо рабочий способ - считать простые множители. Квадрат - это такое число, в разложение которого на простые множители каждый множитель входит в чётной степени. Составить табличку N*M, где M - число простых чисел от 2 до N; заполнить степенями для факториалов; посмотреть, можно ли вычеркнуть строку так, чтобы сумма оставшихся элементов в каждом столбце была чётной.
Возможно, можно ещё подумать и доказать, скажем, что при любом N>6 решения не существует (если что, я понятия не имею, существуют ли они).

[ArmanPrestige]

Сообщение от Abstraction

ArmanPrestige, и что Вы хотите сказать? Теперь посчитайте 1!*2!*3!*...*10!. Элементарная оценка сверху скажет Вам, что это больше 2^78. Более того, можно оценить и результат при N=9, он тоже не влезает.

Извините, проглядел. Не заметил что произведение факториалов. Мне почему-то показалась сумма факториалов.

[Rin]

for Abstraction
Поэксперементировал, значится. Ввел i<9223372036854775807 в условии цикла. Равенство выполняется только при N=2, во всех остальных случаях выводит "Net takix".

[Abstraction]

Поэксперементировал, значится. Ввел i<9223372036854775807 в условии цикла. Равенство выполняется только при N=2, во всех остальных случаях выводит "Net takix".

Ищите ошибку. 1!*3!*4! = 144 = 12^2.