//use itertools::Itertools;
use std::cmp;
use std::collections::BTreeMap;
use std::collections::BTreeSet;
use std::collections::BinaryHeap;
use std::collections::HashMap;
use std::collections::HashSet;
use std::collections::VecDeque;
use std::io::Read;
use std::usize::MAX;

macro_rules! input {(source = $s:expr, $($r:tt)*) => {let mut iter = $s.split_whitespace();let mut next = || { iter.next().unwrap() };input_inner!{next, $($r)*}};($($r:tt)*) => {let stdin = std::io::stdin();let mut bytes = std::io::Read::bytes(std::io::BufReader::new(stdin.lock()));let mut next = move || -> String{bytes.by_ref().map(|r|r.unwrap() as char).skip_while(|c|c.is_whitespace()).take_while(|c|!c.is_whitespace()).collect()};input_inner!{next, $($r)*}};}
macro_rules! input_inner {($next:expr) => {};($next:expr, ) => {};($next:expr, $var:ident : $t:tt $($r:tt)*) => {let $var = read_value!($next, $t);input_inner!{$next $($r)*}};}
macro_rules! read_value {($next:expr, ( $($t:tt),* )) => {( $(read_value!($next, $t)),* )};($next:expr, [ $t:tt ; $len:expr ]) => {(0..$len).map(|_| read_value!($next, $t)).collect::<Vec<_>>()};($next:expr, chars) => {read_value!($next, String).chars().collect::<Vec<char>>()};($next:expr, usize1) => {read_value!($next, usize) - 1};($next:expr, [ $t:tt ]) => {{let len = read_value!($next, usize);(0..len).map(|_| read_value!($next, $t)).collect::<Vec<_>>()}};($next:expr, $t:ty) => {$next().parse::<$t>().expect("Parse error")};}

fn solve() {
    input! {
        n: i64,
        k:usize,
        a: [i64;n]
    }
    let mut a = a;
    a.sort();

    let ans = int_bound(
        std::i64::MIN / 2,
        std::i64::MAX / 2,
        |border| {
            let mut count: usize = a
                .iter()
                .map(|&x| {
                    // aの各要素に対して、x*a[index]<=borderとなるギリギリのindexの値を求める
                    // これを合計し、重複して数えているものやx自身を取り除くことで、x*yがborderの値を超えないような a in x,yの組みの数を求めることができる。
                    let comb_count = if x >= 0 {
                        // マイナスの場合は配列の0番目からスタートするので普通に数えることができる
                        // aが - - 0 0 + + のようになっている場合も、indexが若いほどx * a[index] が大きいという関係は保証されている
                        1 + int_bound(
                            -1,
                            n,
                            |other_index| x * a[other_index as usize] < border,
                            BOUND::LOWER,
                        )
                    } else {
                        // xがプラスの場合はindexが若いほどx * a[index] が小さい
                        // よって、境界は後ろがら見ていく必要がある
                        // また、indexは配列の後ろから見ていった時の値となるため、本来求めたい値は、nから得られたインデックスの値を引くことでもとまる
                        n - int_bound(
                            n,
                            -1,
                            |other_index| x * a[other_index as usize] < border,
                            BOUND::LOWER,
                        )
                    };

                    comb_count as usize
                })
                .sum();

            count -= a.iter().filter(|&&x| x * x < border).count();
            count /= 2;

            //println!("{} {}", border, count);

            k > count
        },
        BOUND::LOWER,
    );

    println!("{}", ans);
}

fn main() {
    let thd = std::thread::Builder::new().stack_size(104_857_600);
    thd.spawn(|| solve()).unwrap().join().unwrap();

    /*
    // 入力を一括で読み込む場合
    let mut buf = String::new();
    std::io::stdin().read_to_string(&mut buf).unwrap();
    let mut input = buf.split_whitespace();

    // inputに対しnext()で読み込んでいく
    let q: usize = input.next().unwrap().parse().unwrap();
    */
}

const LARGE_PRIME: u64 = 1_000_000_007;

// @〜でsnippet
fn int_bound<F: Fn(i64) -> bool>(min: i64, max: i64, f_bigger_false: F, bound_type: BOUND) -> i64 {
    let mut ok = min;
    let mut ng = max;

    while (ng - ok).abs() > 1 {
        let mid = (ng + ok) / 2;
        if f_bigger_false(mid) {
            ok = mid
        } else {
            ng = mid;
        }
    }

    match bound_type {
        BOUND::LOWER => ok,
        BOUND::UPPER => ng,
    }
}

enum BOUND {
    LOWER,
    UPPER,
}


Measured memory_bytes: 3260