#include <iostream>
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <queue>
#include <stack>
#include <vector>
#include <algorithm>
#include <map>
#include <unordered_map>
#include <set>
#include <deque>
#include <bitset>

long long mod = 1e9+7;
class Mint {
public:
  long long x;
  Mint(){}; // 引数なしでも定義できるように引数なしコンストラクタも用意しておく
  Mint(long long a){
    x = a%mod;
    while(x<0){
      x += mod;
    }
  };
  Mint& operator += (const Mint &a){
    x+=a.x;
    x%=mod;
    return *this;
  }
  Mint& operator -= (const Mint &a){
    x += (mod - a.x);
    x%=mod;
    return *this;
  }
  Mint& operator *= (const Mint &a){
    x*=a.x;
    x%=mod;
    return *this;
  }

  // a^n mod を計算する
  // Useaeg: Mint z = y.pow(y, n);
  Mint pow(Mint a, long long n) const {
    Mint y(1);
    Mint b(a);
    while (n > 0) {
      if (n & 1) y *= b;
      b *= b;
      n >>= 1;
    }
    return y;
  }

  // a^{-1} mod を計算する
  Mint modinv(const Mint &a) const {
    return pow(a, mod-2);
  }

  Mint& operator /= (const Mint &a) {
    x *= modinv(a).x;
    x %= mod;
    return *this;
  }

  Mint operator + (Mint &a) const {
    Mint y(*this);
    y += a;
    return y;
  }

  Mint operator - (Mint &a) const {
    Mint y(*this);
    y -= a;
    return y;
  }

  Mint operator * (Mint &a) const {
    Mint y(*this);
    y *= a;
    return y;
  }

  Mint operator / (Mint &a) const {
    Mint y(*this);
    y/=a;
    return y.x;
  }

  // nCk @mod を計算する
  Mint nCk(Mint &n, const long long k) const {
    Mint y = Mint(1);
    Mint one = Mint(1);
    for (Mint i(0); (i.x)<k; i.x++){
      y *= (n-i);
      y /= (i + one);
    }
    return y;
  }

  // nPk @mod を計算する
  Mint nPk(Mint &n, long long k) const {
    Mint y(1);
    for (Mint i(0); (i.x)<k; i.x++){
      y *= (n-i);
    }
    return y;
  }
};

// modを取らないnCkの計算
// 全体としてはオーバーフローしないはずでも、先に分子だけ計算したときに
// オーバーフローする可能性があることに注意                                                                                            
long long NCK[54][54];
void init(int n=54)	{
  for (int i=0; i<n; i++) {
    for (int j=0; j<=i; j++) {
      if (j==0 || j==i) {
        NCK[i][j] = 1;
      } else {
        // パスカルの三角形の性質 nCk = (n-1)C(k-1) + (n-1)Ck を利用
        NCK[i][j] = NCK[i-1][j-1] + NCK[i-1][j];
      }
    }
  }
  return;
}

int main() {
  int N, A, B;
  std::cin >> N >> A >> B;
  std::vector<long long > v(N);
  for (int i=0; i<N; i++) {
    std::cin >> v[i];
  }
  std::sort(v.rbegin(), v.rend());
  std::vector<long long > sum(N+4, 0);
  std::vector<long long > num(N+4, 1);
  init();
  for (int n=A; n<=B; n++) {
    long long min = 1e18;
    for (int i=0; i<n; i++) {
      sum[n] += v[i];
      min = std::min(v[i], min);
    }
    int minnum_select = 0;
    for (int i=0; i<n; i++) {
      if (v[i]==min) minnum_select++;
    }
    int minnum_total = 0;
    for (int i=0; i<N; i++) {
      if (v[i]==min) minnum_total++;
    }
    // printf("minimum_select=%d, minimum_total=%d\n", minnum_select, minnum_total);
    // printf("sum[%d]=%lld\n", n, sum[n]);
    //num[n] = nCk((long long)minnum_total, (long long)minnum_select);
    num[n] = NCK[minnum_total][minnum_select];
    // printf("num[%d]=%lld\n", n, num[n]);
  }
  std::vector<int > below(N+4, 0), same(N+4, 0), over(N+4, 0);
  long long ans = 0;
  double average;
  for (int n=A; n<=B; n++) {
    // printf("n=%d, sum[%d]=%lld\n", n, n, sum[n]);
    for (int m=A; m<=B; m++) {
      if (n==m) continue;
      //printf("n=%d, m=%d, left=%lld*%d=%lld, right=%lld*%d=%lld\n", n, m, sum[A], m, sum[A]*(long long)m, sum[B], n, sum[B]*(long long)n);
      if (sum[n]*(long long)m == sum[m]*(long long)n) {
        same[n]++;
      } else if (sum[n]*(long long)m > sum[m]*(long long)n) {
        below[n]++;
      } else {
        over[n]++;
      }
    }
    // printf("over[%d]=%d\n", n, over[n]);
    if (over[n]==0) {
      // printf("n=%d, no over\n", n);
      ans += num[n];
      average = (double)sum[n]/(double)n;
    }
  }
  printf("%.15lf\n", average);
  printf("%lld\n", ans);
  return 0;
}

Measured memory_bytes: 3196