このディレクトリの索引
#
#  5要素のリストvxの各要素に数値を入力した後、任意の要素番号n(1=<_n=<5)を入力し、
#  その要素番号nに格納している数値を表示させる。
#

'5要素のリストvxの各要素に数値を入力した後、任意の要素番号n(1=<_n=<5)を入力し、その配列要素が格納している数値を表示させる' :-
        '5要素のリストvxの各要素に数値を入力した後'(_vx),
        '任意の要素番号n(1=<_n=<5)を入力し、その要素番号nに格納している数値を表示させる'(_vx).

'5要素のリストvxの各要素に数値を入力した後'(_vx) :-
        '5要素のリストvx'(_vx),
        各要素に数値を入力した後(_vx).

'5要素のリストvx'(_vx) :-
        length(_vx,5).

各要素に数値を入力した後([]).
各要素に数値を入力した後([_数|R]) :-
        数を得る(数値,_数),
        各要素に数値を入力した後(R).

'任意の要素番号n(1=<_n=<5)を入力し、その要素番号nに格納している数値を表示させる'(_vx) :-
        '任意の要素番号n(1=<_n=<5)を入力し'(_n),
        その要素番号nに格納している数値を(_n,_vx,_格納している数値),
        表示させる(_n,_格納している値).

'任意の要素番号n(1=<_n=<5)を入力し'(_n) :-
        整数を得る('任意の要素番号n(1=<_n=<5)',(_n>=1,_n=<5),_n).

その要素番号nに格納している数値を(_n,_vx,_格納している数値) :-
        nth1(_n,_vx,_格納している数値).

表示させる(_n,_格納している値) :-
        writef('要素番号[%t]の格納している値は %t です。\n',[_n,_格納している値]).



%  数を得る/2
%  整数を得る/3