結果

問題 No.133 カードゲーム
ユーザー yukirinyukirin
提出日時 2016-03-01 19:57:49
言語 Go
(1.23.4)
結果
WA  
実行時間 -
コード長 1,404 bytes
コンパイル時間 13,424 ms
コンパイル使用メモリ 226,436 KB
実行使用メモリ 6,824 KB
最終ジャッジ日時 2024-10-10 23:10:17
合計ジャッジ時間 15,286 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3 WA * 1
other AC * 19
権限があれば一括ダウンロードができます

ソースコード

diff # 

package main

import (
	"bufio"
	"fmt"
	"os"
	"strconv"
)

var sc = bufio.NewScanner(os.Stdin)

func main() {
	sc.Split(bufio.ScanWords)
	n := nextInt()
	a, b := make([]int, n), make([]int, n)
	for i := range a {
		a[i] = nextInt()
	}
	for i := range b {
		b[i] = nextInt()
	}

	win, all := 0, 0

	f := func(a []int) {
		c := 0
		for i, v := range a {
			if v > b[i] {
				c++
				continue
			}

			if b[i] > v {
				c--
				continue
			}
		}
		if c > 0 {
			win++
		}
		all++
	}

	perm(a, n, f)
	fmt.Println(float64(win) / float64(all))
}

func nextLine() string {
	sc.Scan()
	return sc.Text()
}

func nextInt() int {
	i, _ := strconv.Atoi(nextLine())
	return i
}

func comb(a []int, r int, fn func([]int)) {
	if r > len(a) || r < 1 {
		return
	}

	var f func([]int, int, int)
	f = func(ret []int, last, c int) {
		if c == 0 {
			fn(ret)
			return
		}

		c--
		for i, v := range a[last : len(a)-c] {
			ret[r-c-1] = v
			f(ret, i+last+1, c)
		}
	}

	ret := make([]int, r)
	f(ret, 0, r)
}

func perm(a []int, r int, fn func([]int)) {
	permL := make([]int, r)
	f := func(s []int) {
		copy(permL, s)

		k, i := 1, 0
		c := make([]int, r+1)
		for i := 1; i < len(c); i++ {
			c[i] = i
		}

		for k < r {
			if k&1 == 1 {
				i = c[k]
			} else {
				i = 0
			}

			permL[k], permL[i] = permL[i], permL[k]

			fn(permL)
			k = 1
			for ; c[k] == 0; k++ {
				c[k] = k
			}
			c[k]--
		}
	}

	comb(a, r, f)
}
0