#include <iostream>
#include <algorithm>
//分區(qū)
int partition(std::vector<int>&vec,int start,int end) {
 int value=vec[end];
 int tail=start-1;
 for(int i=start;i<end;++i){
  if(vec[i]<value){
   tail++;
   std::swap(vec[i],vec[tail]);
  }
 }
 tail++;
 std::swap(vec[tail],vec[end]);
 return tail;
}
long long solve(std::vector<int>&vec,int start,int end,int k) {
 //快排思想，進行分區(qū)，快排復(fù)雜度為O(nlgn),但取最值只比較分區(qū)的一個區(qū)間，所以為O(n)
 int now = partition(vec,start,end);
 if(k < now)
  return solve(vec,start,now-1,k);
 else if(k > now)
  return solve(vec,now+1,end,k);
 else
  return vec[now];
}
int main() {
 int n;//要比較的數(shù)的個數(shù)
 while(std::cin>>n) {
  std::vector<int> vec_i(n,0);//使用vector存儲n個數(shù)
  for(int i = 0; i < n; ++i) {
   std::cin>>vec_i[i];
  }
  int k;
  //最大的數(shù)，index為n-1
  k = n - 1;
  long long x1 = solve(vec_i,0, n-1,k);
  //次大的數(shù)，index為n-2
  k = n - 2;
  long long x2 = solve(vec_i,0, n-2,k);
  //第三大的數(shù)
  k = n - 3;
  long long x3 = solve(vec_i,0, n-3,k);
  long long Ans = x1 * x2 * x3;//最大的三個數(shù)的乘積
  if(n > 3) {
   //最小的數(shù)，index為0
   k = 0;
   long long y1 = solve(vec_i,0, n-1,k);
   //次小的數(shù)，index為1
   k = 1;
   long long y2 = solve(vec_i,0, n-2,k);
   Ans = std::max(Ans, y1*y2*x1);//兩者比較取最大
  }
  std::cout<<Ans;
 }
 return 0;
}