R, G, B の 3 文字から重複を許して 5 文字を取り出し，1 列に並べる。隣り合う文字が同じにならない文字列を列挙し，最終行に何通りあるかを出力せよ。
3 文字から重複を許して 3 文字を取り出して...の場合は以下のような出力となるように。というのが仕様
RGR
BGR
RBR
GBR
GRG
BRG
RBG
GBG
GRB
BRB
RGB
BGB
12
解答例はこの記事のコメントを参照
最新の画像［もっと見る］
-
算額（その2135）
10時間前
-
算額（その2134）
16時間前
-
算額（その2133）
1日前
-
算額（その2132）
3日前
-
算額（その2131）
4日前
-
算額（その2130）
4日前
-
算額（その2129）
5日前
-
算額（その2128）
5日前
-
算額（その2127）
6日前
-
算額（その2126）
6日前
a=as.matrix(expand.grid(rgb,rgb,rgb,rgb,rgb))
b=apply(a,1,function(x)all(x[1:4]!=x[2:5]))
c=apply(a[b,],1,function(x)cat(paste(x,collapse=""),"\n"))
cat(sum(b))