🚀 go-pugleaf

$B>>85N4Fs!wCNG=!&6e=#9)6HBg3X$H$$$$$^$9!%(B

Pascal $B$*$h$S(B C $B$K@vG>$5$l$??M4V$,!$(Bprolog$B$rJY6/$9$k$N$KNI$$65(B
$B2J=q$O$"$j$^$;$s$+!)(B

$B!t(B $B0J2<(B Pascal$B$r(BC$B$HFI$_BX$($F$b9=$$$^$;$s!%(B

Pascal$B7O$N%W%m%0%i%^$,?7$7$$8@8l$rJY6/$9$k$H$J$k$H!$$^$:!$(B

	write('Hello World');

$B$KAjEv$9$k%W%m%0%i%`$,:n$j$?$/$J$k!%$=$7$F<!$K!$(B

	for i:= 1 to 10 do
	begin
		.....
	end;

$B$KAjEv$9$k%W%m%0%i%`$,:n$j$?$/$J$k!%$G$b!$(Bprolog$B$N652J=q$r8+$k$H:G(B
$B=i$K!$2H7O?^$,=P$F$-$F!$LL$/$i$&!%(B/* $B2H7O?^$,@;=q$H$$$&$N$bLdBj$@(B
$B$J!%%5%6%($5$s0l2H$J$IF|K\?M$K?F$7$_$d$9$$NcBj$@$C$?$i$b$C$HFI$_$d(B
$B$9$$$N$+$b$7$l$J$$(B */
$B<!$K!$JQ?t$r;H$&$N$K@k8@$7$J$/$F$b$$$$$N!)(B -> $B5$;}$A0-$$8@8l$@$J!%(B
$BJQ?t$KBeF~$9$k$N$K!$$J$<!$(B"A1 = A + 1" $B$H=q$+$1$J$/$F!$(B"A1 is A + 1"
$B$J$I$H$d$d$3$7$$=q$-J}$9$k$N!)(B $BJQ?t$NCM$r$J$<%*%P!<%i%$%H=PMh$J$$$N!)(B
"A is A + 1" $B$,=PMh$J$$!%$HITK~1>!9$,=P$F$/$k!%(B

Pascal$B7O$N8@8l$K$J$l$??M4V$r!$$9$s$J$j(Bprolog$B8@8l$KM6F3$7$F$/$l$k$h(B
$B$&$J!$(Bprolog$B$N652J=q$O$J$$$N$G$7$g$&$+!)(B

$B$:$P$j!$(B
	$B!V(BPascal$B%W%m%0%i%^$N$?$a$N!$(BProlog$BF~Lg!W(B

$B$J$I$H$$$&Bj$NK\$O$J$$$G$7$g$&$+!%(B ($B=hM}7O$O!$(Bsicstus$B$r;H$C$FJY(B
$B6/$7$h$&$H9M$($F$$$^$9!%(B)

$B$J$*!$;d$,(Bprolog$B$rJY6/$7$h$&$H9M$($?$N$O!$$"$k=89g$+$i!$$"$k>r7o(B
$B$rK~$?$9AH9g$;$rC5$9%W%m%0%i%`$r(BC$B$G=q$$$F$$$?$i!$$H$F$bFI$_$K$/$$(B
$B%W%m%0%i%`$K$J$C$?$N$G!$%Q%?!<%s%^%C%A$,F@0U$i$7$$(Bprolog$B$r;H$C$F(B
$B$_$h$&$H9M$($?$+$i$G$9!%(B
---------------------------
Ryuji Matsumoto
Kyushu Institute of Technology.(Japan)
e-mail:matumoto@pluto.ai.kyutech.ac.jp