#262630 (Perl) No.287 場合の数 - yukicoder

提出ソース

結果

問題	No.287 場合の数
ユーザー	%20
提出日時	2018-06-04 16:16:11
言語	Perl (5.40.0)
結果	AC
実行時間	49 ms / 5,000 ms
コード長	126 bytes
コンパイル時間	29 ms
コンパイル使用メモリ	5,120 KB
実行使用メモリ	5,376 KB
最終ジャッジ日時	2024-06-30 09:41:23
合計ジャッジ時間	1,549 ms
ジャッジサーバーID （参考情報）	judge3 / judge4

このコードへのチャレンジ
（要ログイン）

ファイルパターン	結果
sample	AC * 3
other	AC * 22

権限があれば一括ダウンロードができます

コンパイルメッセージ

Main.pl syntax OK

ソースコード

raw source code

@0=(1)x(($N=<>)+1);
for$k(0..2){
	for$i(0..2*$N){
		for$j(0..2*$N){
			${$k+1}[$i+$j]+=$$k[$i]*$$k[$j]
		}
	}
}
print$3[2*$N]

0