From: suzuki@alp0.cs.uec.ac.jp (Suzuki Takuzi)
Subject: Re: [Pascal] Pascal for education (Re: Pointer)
Organization: Dept. of Comput. Sci. and Info. Math., University of
	Electro-Communications.
	<1346@axegw.axe-inc.co.jp>
	<TAKAGI.92Dec19073551@craps.elcom.nitech.ac.jp>
	<1352@axegw.axe-inc.co.jp>
Distribution: fj
Date: Tue, 22 Dec 1992 23:33:21 GMT

  $@NkLZ!w#U#E#C$G$9!%!V%W%m%0%i%_(J$@%s%0650i!W$H$$$&$3$H$P$NDj5A$NLdBj$K$J(J
$@$j$=$&$J$N$G!$$b$7$_$J$5$s$N9M$($F$$$i$C$7$c$k$3$H$HOC$,$+$_$"(J$@$o$J$$(J
$@$h$&$G$7$?$i8fMF<O$/$@$5$$!%(J

In article <1352@axegw.axe-inc.co.jp> take@axegw.axe-inc.co.jp (Shozo TAKEOKA) writes:

 |>In article <1346@axegw.axe-inc.co.jp> take@axegw.axe-inc.co.jp (Shozo TAKEOKA) writes:
 |> >   Call by name $@$b65$($i$l$J$$8@8l$OBLL\!#(J
 |> > #  $@;n83$K(J Call by name $@$r=P$5$J$$$J(J$@$i!"OC$OJL!)!)!)(J :-P
 |>$@!&(Jcall by name $@$r@Q6KE*$KMxMQ$9$k$3$H$O!"NI$$%W%m%0%i%_%s%0%9%?%$%k$H(J
 |>  $@8@(J$@$($k$+!)(J
 |  $@NI$/$F$b!"0-$/$F$b!"35G0$O65$($J$$$H!#(J

  $@$3$l$O!V%W%m%0%i%_%s%08@8l$N650i!W$G$"$C$F!V%W(J$@%m%0%i%_%s%0$N650i!W$G(J
$@$O$J$$$N$G$O$J$$$G$7$g$&$+!%$o$?$7$O!$$3$l$O!V%W%m%0%i%_%s%0!W$H$$$&9T(J
$@0Y$K$J$l(J$@$?8e$G?H$K$D$1$l$P$h$$$b$N$@$H;W$$$^$9!%(J

  $@$5$F!$$G$O$*$^$($N$$$&!V%W%m%0%i%_%s%0!W$H$O2?$J$N$+!)$H$$(J$@$&$3$H$G$9(J
$@$,!$%W%m%0%i%`$O2?$i$+$NLdBj$r2r$/$?$a$K!HA0$b$C$F=q$$$?$b$N!I$G!$$=$l(J
$@$O$"$kJ}?K$K=>$C$FDj(J$@$a$?!H4pK\E*F;6q!I$NAH$_9g$o$;$K$J$k$O$:$G$9!%$I$N(J
$@$h$&$J4pK\E*F;6q$rA*$V$+$G!$<jB3$-7?!$4X?t7?!$O@M}(J$@7?$H$$$C$?%Q%i%@%$%`(J
$@$N0c$$$d!$%W%m%0%i%_%s%0%9%?%$%k$N0lIt$bDj$^$C$F$/$k$H;W$$$^$9$,!$$H$j(J
$@$"$($:0l$D(J$@8GDj$7$F$d$k$H$7$^$9!J2?$K8GDj$9$k$+$O$b$A$m$s5DO@$NBP>]$G$9(J
$@$,!$2?$H$+7h$a$?$H$7$F!K!%$=$&$9$l$P!$!V(J$@%W%m%0%i%_%s%0650i!W$H$O!H4pK\(J
$@E*$JF;6q$NAH9g$;J}$K4X$9$k650i!I$H$$$($k$H;W$$$^$9!%$3$NCJ3,$G$O(J
$@3X=,<T(J$@$O4pK\E*F;6q$=$N$b$N$NA*$SJ}$r3X$V$N$G$O$J$$!$$H$$$&$3$H$,%]%$%s%H(J
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
$@$G$9!%;XF3<T$NNONL$OE,@Z$JF;6q$NA*Br$K$+$+$C$F$-$^$9!%(J

  $@=i?4<T$K$H$C$F$O!$0l$D0l$D(J$@$NF;6q$OC1=c$J$[$&$,$h$/!$$^$?F;6q$N?t$O$"(J
$@$^$jB?$/$J$$$[$&$,$$$$$H;W$$$^$9!%>/$J$$F;6q$NAH$_9g$o$;$G(J$@$J$k$Y$/Bg$-(J
$@$JMx1W$r@8$`$h$&$KF;6q$rA*Br$9$k$o$1$G$9!%$=$N$H$-!$$?$H$($P(J C $@$N%^%/(J
$@%m$O4pK\E*$JF;6q$K(J$@$$$l$k$Y$-$J$N$+$I$&$+!$$H$$$&$3$H$r5DO@$9$k$N$@$H;W(J
$@$&$N$G$9!%(J

  $@$?$H$($P!$<jB3$-7?$GJQ?t;X8~$N%W%m(J$@%0%i%_%s%0$r65$($k>l9g$r9M$($F(J
$@$_$^$9!%3X=,<T$N@.D9CJ3,$O<!$N$h$&$K$J$k$G$7$g$&!%(J

    $@!&LdBj$r2r$/$N(J$@$K!$$=$l$r2r$/$?$a$N<j=g$NJB$S$r9M$(!$$=$l$r(J
      $@=g$K=q$-2<$7$F%W%m%0%i%`$r:n@.$9$k!$$H$$$&$3$H$,M}(J$@2r$G$-$k!%(J
    $@!&>r7oH=CG$d7+$jJV$7$r3X$S!$<j=g$NJB$S$K$5$(J,2r$G$-$l$P(J
      $@%W%m%0%i%_%s%0$,2DG=$G$"(J$@$k$H$$$&<+?.$rF@$k!%(J
     $@!J$3$3$^$G$J$i(J BASIC $@$GE~C#2DG=!%!K(J
    $@!&%0%i%U%#%C%/%9$J$I$N3X=,<T$N6=L#$r(J$@$=$=$kBj:`$O$3$N$/$i$$$N(J
      $@$J$k$Y$/Aa$$CJ3,$G@Q6KE*$K$H$j$$$l$k$Y$-$G$"$k!%(J
      $@!J$?$H$($P(J Pascal $@$+$i(J Xlib $@$r8F$Y$k$h$&$K$9$k$/$i$$$N3HD%$O(J
      $@$9$Y$-!)!K(Jevent-driven $@E*$J%W%m%0%i%`:nK!$b<+A3$K(J$@F3F~$G$-$k!%(J
      $@!J$b$&>/$7$"$H$G$b$h$$!)!K(J
    $@!&<jB3$-$N35G0$r3X$S!$E,Ev$JC10L$GJ,3d$9$k$3$H$K$h$C(J$@$F!$Hf3SE*(J
      $@Bg$-$J%W%m%0%i%`!J#1#0#09T0J>e$/$i$$!)!K$G$b:n$l$k$h$&$K$J$k!%(J
      $@$3$N$H$-!$0z?t$N(J$@35G0$r?H$K$D$1!$<jB3$-$N30$+$i<u$1$H$k%G!<%?!$(J
      $@<jB3$-Fb$GMxMQ$9$k%G!<%?!$<jB3$-$+$i30$K=P$F$$$/(J$@%G!<%?$rL@3N(J
      $@$K0U<1$9$k$3$H$,<jB3$-2=$NK\<A$G$"$k$3$H$rM}2r$9$k!%!J$?$H$($P(J
      $@ITE,@Z$JBg0hJQ(J$@?t$NMxMQ$r95$($k$h$&$K$J$k!%!K(J
    $@!&07$&%G!<%?$,J#;($K$J$C$?>l9g!$J#;($J9=B$$r$b$A$&$k%G!<%?$r!$$"$k(J
      $@%G!<%?7?$NCM$H$_$J$9$3$H$K$h$C$F!$%W%m%0%i%`$N8+DL$7$,$h$/$J$k(J
      $@$3$H$rCN$k!%!JG[Ns$J$I$O<B(J$@MQE*$K$b$&>/$7A0$G3X=,$7$?J}$,$h$$$+$b(J
      $@$7$l$J$$$,!$7?$H$7$F0U<1$9$k%l%Y%k$bI,MW!%!K?t$dJ8;z$J$I(J$@$N4pK\7?(J
      $@$N$[$+!$G[Ns7?!$9=B$7?!$9gJ;7?!$Ns5s7?!$=89g7?$J$I$N4pK\E*$J(J
      $@MxMQNc$r3X$s$G$$$/$3(J$@$H$K$J$k!%!J$I$N$h$&$J%G!<%?7?$r4pK\E*F;6q(J
      $@$H$9$k$+$O$*$*$$$K5DO@$NI,MW$,$"$k$@$m$&!%!K(J
    $@!&<B(J$@MQ$K;H$o$l$k%"%k%4%j%:%`$d%G!<%?9=B$$r!$<jB3$-$K$h$k(J
      $@!V%W%m%0%i%`$N9=B$2=!W$H%G!<%?7?$K$h$k!V%G(J$@!<%?$N9=B$2=!W$N(J
      $@Fs$D$NF;6q$r4pK\$K$7$F3X$s$G$$$/!%7W;;NL$N35G0$NM}2r$OI,?\(J
      $@$G$"$k$,!$%"%k(J$@%4%j%:%`$N$b$DK\<AE*$J8zN($N5DO@$K$H$I$a!$(J
      $@:GE,2=$J$I$K$h$C$FF@$i$l$k8zN(8~>e$K4X$9$k5DO@$O$b$&(J$@$9$3$7(J
      $@8e$G$d$C$?$[$&$,$h$$$H;W$&!%%=!<%H$N%"%k%4%j%:%`$d@~7A%j%9%H!$(J
      $@FsJ,LZ$J$I$,Nc$H$7$F(J$@$"$2$i$l$k!%(J
      $@!J$3$3$^$G(J Pascal $@$GE~C#2DG=!%$b$A$m$s(J ANSI C $@$J$i=<J,!%$G$b(J
      $@%^%/%m$O@Q6KE*$K(J$@;H$&I,MW$O$J$$!%!K(J

  $@$3$l$G#1G/J,$0$i$$$NJ,NL$H9M$($^$9!%1i=,$b$7$/$O<B83$rDL$8$F!$3X=,<T(J
$@$K$O$J$k$Y(J$@$/$?$/$5$s%W%m%0%i%`$r=q$$$F$b$i$$!$$G$-$l$P:n$C$?$=$N>l$GE:(J
$@:o;XF3$,<u$1$i$l$k$H$h$$$H;W$$$^$9!%!J$H(J$@$/$K:G=i$NCJ3,$G$O!%!KEE;R%a!<%k(J
$@$rMxMQ$9$k$H$+$C$3$$$$$G$9$,!$?M4VF1;N$,D>@\%3%_%e%K%1!<%7%g%s$r$H$j(J$@$J$,$i(J
$@;XF3$7$?J}$,!$$H$/$K=i4|$NCJ3,$GMn$A$3$\$l$k?M$r$D$/$i$J$$$?$a$KM-8z(J
$@$@$H;W$$$^$9!%(J

  $@>e$G=R$Y(J$@$?$3$H$O!$!V=i?4<T$,%W%m%0%i%_%s%0$r3P$($k;~$K!$<jB3$-7?!?(J
$@JQ?t;X8~$G$O$@$a$@!W$H$$$o$l$?=V4V$KJx2u$7(J$@$^$9!%$7$?$,$C$F!$:#8e$N5DO@$O(J
    $@!&=i?4<T$,%W%m%0%i%_%s%0$r?H$K$D$1$k$N$KE,$7$?%Q%i%@%$%`$O2?$+!%(J
    $@!&J}?K$r7h$a$?>e$G!$6qBNE*$K$I$N$h$&$JCJ<h$j$G%+%j%-%e%i%`$r(J
      $@AH$_N)$F$k$+!%$=$NL\I8$rC#@.$9$k(J$@$?$a$K$O$I$N8@8l$O:GE,$+!%(J
$@$H$$$&$U$&$K?J$`$N$@$H9M$($^$9!%(J

 |  $@F,$N$$$$E[$O<+J,$G9M$($F$A$c$s$H$J$k(J$@!#GO</$O;`$J$J$-$cD>$i$J$$!#!J$I$C(J
 |$@$A$K$7$F$b!"65$($F$bL5BL!K(J

  $@!V650i!W$H$7$F9M$($k$H$-!$$3$N8@MU(J$@$O$1$C$7$FH/$7$F$O$$$1$J$$!%JY6/(J
$@$7$F!J1i=,$d<B83$rDL$7$F!K?H$KIU$1$i$l$k$+$i$3$=!V650i!W$J$N$@$7!$(J
$@$=(J$@$N5DO@$r$7$F$$$k$O$:!%$?$H$(8=>u$,$=$&$G$J$/$F$b!%(J

--
$@NkLZBn<#(J@$@>pJs9)3X(JD3.$@EEDLBg1!(J (suzuki@alp0.cs.uec.ac.jp)