このディレクトリの索引

http://sum2cha.blogpico.com/archives/2017 レス番号182 
# [1] 授業単元:アルゴリズム 
# [2] 問題文:数値を1から10まで出力する。ただし、5まで出力した時点で 
# 一度改行する 

'数値を1から10まで出力する。ただし、5まで出力した時点で一度改行する'  :- 
    for(1,N,10), 
    write(N), 
    'ただし、5まで出力した時点で一度改行する'(N), 
    N = 10. 

'ただし、5まで出力した時点で一度改行する'(5) :- nl,!. 
'ただし、5まで出力した時点で一度改行する'(_).