このディレクトリの索引

#  配列分からないので助けてください!
#  [1] 授業単元:Cプログラミング(配列)
#  [2] 問題文(含コード&リンク): http://www.dotup.org/uploda/www.dotup.org1291228.txt
#  [3] 環境
#   [3.1] Linux
#   [3.2] gcc
#   [3.3] 言語: C
#  問題1:double型の二次元配列f[10][10]の要素全てに11.0を代入し表示する。
#  forループを使うこと。
#  

'double型の二次元配列f[10][10]の要素全てに11.0を代入し表示する。' :-
        'double型の二次元配列f[10][10]の要素全てに11.0を代入し'(LL),
        表示する(LL).

'double型の二次元配列f[10][10]の要素全てに11.0を代入し'(LL) :-
        length(LL,10),
        findall(L,(
                    append(_,[L|R],LL),
                    length(L,10),
                    all(L,11.0)),
                LL).

表示する([]) :- !.
表示する([L|R]) :-
        append(_,[V|R1],L),
        write_formatted('%t ',[V]),
        R1 = [],
        nl,
        表示する(R).