結果
| 問題 | 
                            No.695 square1001 and Permutation 4
                             | 
                    
| コンテスト | |
| ユーザー | 
                             | 
                    
| 提出日時 | 2018-06-10 23:59:43 | 
| 言語 | Crystal  (1.14.0)  | 
                    
| 結果 | 
                             
                                CE
                                 
                             
                            
                            (最新)
                                AC
                                 
                             
                            (最初)
                            
                            
                         | 
                    
| 実行時間 | - | 
| コード長 | 512 bytes | 
| コンパイル時間 | 2,475 ms | 
| コンパイル使用メモリ | 218,008 KB | 
| 最終ジャッジ日時 | 2024-11-14 20:26:40 | 
| 合計ジャッジ時間 | 3,000 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge4 / judge5 | 
(要ログイン)
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
            
            
            
            
            ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
[2mShowing last frame. Use --error-trace for full trace.[0m
In [4mMain.cr:26:7[0m
[2m 26 | [0m[1mv=[0]*(n-n/2);v[0]=1[0m
            [32;1m^[0m
[33;1mError: expected argument #1 to 'Array(Int32)#*' to be Int, not Float64[0m
Overloads are:
 - Array(T)#*(times : Int)
            
            ソースコード
def solve(v,n,q,x)
	m=n/2;r=0_i64
	(1...n-m).each{|i|v[i]=0}
	(1...n-m).each{|i|x.each{|e|
		e<=i && (v[i]=(v[i]+v[i-e])%q)
	}}
	x.each{|e|([m-e,0].max...[n-e,m].min).each{|i|
		r=(r+1_i64*v[i]*v[n-i-e-1])%q
	}}
	r
end
def pow(x,y,q)
	z=1_i64
	while y>0
		y%2>0 && (z=z*x%q)
		x=x*x%q
		y/=2
	end
	z
end
n,m=gets.not_nil!.split.map &.to_i
x=gets.not_nil!.split.map &.to_i
m1=168647939;m2=592951213
v=[0]*(n-n/2);v[0]=1
r1=solve(v,n,m1,x);r2=solve(v,n,m2,x)
rm=(r2-r1+m2)*pow(m1.to_i64,m2-2,m2)%m2
puts rm*m1+r1