このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1291471791/601
#  [1] 授業単元:プログラミング演習  
#  [2] 問題文(含コード&リンク) 
#  問題1 
#  10個の要素を持つ配列 data を宣言し、先頭の要素から順番に1〜 10 までの整数を代入した後、表示するプログラムを for 文を 使用して作成せよ。  

'10個の要素を持つ配列 data を宣言し、先頭の要素から順番に1〜 10 までの整数を代入した後、表示する' :-
        '10個の要素を持つ配列 data を宣言し'(_HeapVector),
        '先頭の要素から順番に1〜 10 までの整数を代入した後'(_HeapVector),
        '表示する'(_HeapVector,10).

'10個の要素を持つ配列 data を宣言し'(_HeapVector) :-
        new_heap_vecotor(_HeapVector,10).

'先頭の要素から順番に1〜 10 までの整数を代入した後'(_HeapVector) :-
        for(0,N,9),
        U is random mod 10,
        set_vector_element(_HeapVector,N,U),
        N = 9.

'表示する'(_HeapVector) :-
        for(0,N,9),
        vector_element(_HeapVector,N,U),
        put_code(U),
        nl,
        N = 9.