このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1307166756/478
#  [1] 授業単元:プログラム実行カウンタの作成  
#  [2] 問題文(含コード&リンク):  
#  log.txtのファイルを利用して、作成したプログラムが何回目の実行かを画面表示するプログラムを作成しなさい 
#  なお、簡単のため、log.txtには初めに0と入力し、保存しておいてもかまわない 
#  

'log.txtのファイルを利用して、作成したプログラムが何回目の実行かを画面表示するプログラムを作成しなさい' :-
        open('log.txt',update,Updatestream),
        readln(Updatestream,[N]),
        N2 is N + 1,
        write(Updatestream,N2),
        close(Updatestream),!,
        writef('このプログラムは%t回目の実行です\n',[N2]),!.