このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1320365280/891
#  うまくいかなかったので、わかる方、お手数ですがもう1度お願いします。 
#   
#  問題 
#   
#  一つの行に、n個の “ “(空白)に続いてm個の “*”を順番に出力する関数 void putzs(int n, int m)を作成せよ。  
#  更にこれを用いて no段のピラミッドを描くプログラムを作成せよ。  
#   
#   
#  no=3の場合  
#   
#  -     *  
#  -    ***  
#  -   *****  
#   
#  よろしくお願いします。 
#   

'一つの行に、n個の “ “(空白)に続いてm個の “*”を順番に出力する関数 void putzs(int n, int m)を作成せよ。
更にこれを用いて no段のピラミッドを描くプログラムを作成せよ。

no=3の場合

-     *
-    ***
-   *****

よろしくお願いします。'(_no段) :-
        between(1,_no段,_段),
        _n is _no段 - _段,
        _m is (_段 - 1) * 2 + 1,
        putzs(_n,_m),
        _no段 = _段.

putzs(_n,_m) :-
        between(1,_n,N),
        write(' '),
        _n = N,
        between(1,_m,M),
        write(*),
        _m = M.