このディレクトリの索引

# 出典 :: C/C++の宿題片付けます 157代目 #488 # {1] 授業単元:プログラミング演習 # [2] 問題文: # http://ime.nu/codepad.org/8gKIcGy2 # 上記のプログラムを参考にし、文字型配列moji[15]を宣言し、初期値として"one-two-three"を代入すると # "one,two,three"と出力されるプログラムを作成しなさい。 # '文字列中の-を,に変換する'(_文字列,_変換された文字列) :- findall(_文字,( '取り出した文字が-の時だけ,に変換する'(_文字列,_文字)),_文字ならび), atom_chars(_変換された文字列,_文字ならび). '取り出した文字が-の時だけ,に変換する'(_文字列,_文字) :- 取り出した文字が(_文字列,_取り出した文字), '-の時だけ,に変換する'(_取り出した文字,_文字). 取り出した文字が(_文字列,_取り出した文字) :- sub_atom(_文字列,_,1,_,_文字). '-の時だけ,に変換する'('-',',') :- !. '-の時だけ,に変換する'(_文字,_文字).