いろんな言語で宿題スレ

いろんな言語で宿題ス ..

69:デフォルトの名無しさん
09/06/01 13:01:53
>>62
% Prolog (残り半分があります)
:- op(800,xfx,は).
:- op(650,xfx,の).
:- op(250,xf,円).

隠した物([一万円札,千円札,百円玉,十円玉]).

隠した場所([髪の中,胸のポケット,スカートのポケット,靴の中]).

髪の中は胸のポケットの直ぐ上にある.
胸のポケットはスカートのポケットの直ぐ上にある.
スカートのポケットは靴の中の直ぐ上にある.

A は B の上にある :- A は B の直ぐ上にある.
A は B の上にある :- A は C の直ぐ上にある,C は B の上にある.

お金(一万円札,10000 円).
お金(千円札,1000 円).
お金(百円玉,100 円).
お金(十円玉,10 円).

ヒント(1,髪の中,一万円札).
ヒント(2,_千円札の場所,千円札,_十円玉の場所,十円玉) :- _千円札の場所は _十円玉の場所の上にある.
ヒント(3,スカートのポケット,_物1,胸のポケット,_物2) :- お金(_物1,_円1 円),お金(_物2,_円2 円),_円_1 is _円2 * 10.

次ページ

続きを表示

1を表示