このディレクトリの索引

http://pc12.2ch.net/test/read.cgi/tech/1250204272/696 
#  [1] 授業単元:プログラミング 
#  [2] 問題文(含コード&リンク): 
#  http://ime.nu/kansai2channeler.hp.infoseek.co.jp/cgi-bin/joyful/img/9968.txt 
# 1. 
# a[i][j]=0  1  2 
#       10 11 12 
#       20 21 22 
# と、x[3](成分1,5,10)の積を表示するプログラム 
# 
# 2. 
# 3*3の単位行列と 
# x[3](成分1,5,10)の積を表示するプログラム 
# 
# 3. 
# 2次方程式の解:1次元変数c[2]を入力し、 
# c[0]x^2+c[1]x+c[2]=0の二つの解(実数部と虚数部:xre[2],xim[2])を 
# 表示するプログラム 

t745(1) :-
        行列の積([[0,1,2],[10,11,12],[20,21,22]],[[1],[5],[10]],X),
        writef('行列の積は %t\n',[X]).

t745(2) :-
        単位行列(3,_単位行列),
        行列の積(_単位行列,[[1],[5],[10]],X),
        writef('単位行列との積は %t\n',[X]).


% t242