From: wd@kurims.kyoto-u.ac.jp (Kamo Hiroyasu)
Subject: [Pascal] Pascal for education (Re: Pointer)
Followup-To: fj.lang.misc
Organization: Research Institute for Mathematical Sciences, Kyoto, Japan.
	<ZIC.92Dec8192933@tcin0.tci.toshiba.CO.JP>
Distribution: fj
Date: Tue, 15 Dec 1992 10:33:06 GMT

  $B$4$V$5$?$7$F$$$^$9!#3{$H$b$&$7$^$9!#(B
  $B$$$D$b(B fj.lang.* $B$G6+$s$G$$$k$3(B$B$H$r$^$?6+$S$^$9$N$G!"2?EY$bJ9$+$5$l(B
$B$F<*$K%?%3$,$G$-$??M$O$4MF<O$r!#(B
  Pascal $B$NOCBj$,%a%$%s$J$N$G!"(Bfollowup-to: fj.lang.misc $B$K$7$F$$$^$9!#(B

In article <ZIC.92Dec8192933@tcin0.tci.toshiba.CO.JP>
 zic@tci.toshiba.CO.JP (Nobuyoshi Kamei) writes:

 >$BHuED(B> $B!!$=$s$J0UL#$G$b!"7W;;5!9)3X$N=i3X<T$,%W%m%0%i%_(B$B%s%0$r3X$V$N$K(B
 >$BHuED(B> $B!!(BPascal$B$O:GE,$G$"$k$H9M$($F$$$^$9!#4pK\E*$J;EMM$O=hM}7O$K0MB8$7$J$$(B
                                            ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 >$BHuED(B> $B!!$D$/$j$K$J$C$F$$$^$9$+$i(B$B!#(B
          ^^^^^^^^^^^^^^^^^^^^^^^^^

  $B$=$l$O13$G$9$h!#:,5r$N$J$$?@OC$G$9$h!#(B
  $BE57?E*$JH?Nc$O(B Pascal $B$G$O%W%j%_%F%#%V$K$J$C$F$$$kF~=PNO$^$o$j$G$9!#(B
  Pascal $B$G$O!"F~=PNO$N4pK\E*$J5!G=$G$"$k(B open $B$H(B close $B$N5!G=$,8@8l;E(B
$BMM$KF~$C$F$$$^$;$s!#!J(BJCL $B$G$d$k$3$H$@$+$iCN$i$s$H$$$&$D$b$j$J$s$@$m$&(B
$B$J!#!K$G!"(B$B$7$+$?$,$J$$$N$G!"$=$NJU$O=hM}7O$4$H$KFH<+$N3HD%$r9T$J$C$F$$(B
$B$^$9!#(Breset $B$H(Brewrite $B$N0z?t$rA}$d$9=hM}(B$B7O!"(Bopen $B$H(B close $B$rI8=`<jB3$-(B
$B$KDI2C$9$k=hM}7O!"!D!"$7$+$b0z?t$N<h$jJ}$b=hM}7O$4$H$K%P%i%P%i!#40A4$K(B
$B:.Mp>uBV$G$9!#(B
  $B$=$l$J$i!"$$$C$=$N$3$H!J(BC $B$N$h$&$K!KF~=PNO$O%W%j%_%F%#%V$G$O$J$/%i%$(B
$B%V%i%j$KDI$$$d(B$B$C$?$[$&$,$h$C$]$IJXMx$J$N$K!"(BPascal $B$N8@8l;EMM$G$OF~=P(B
$BNO$O$7$C$+$j$H%W%j%_%F%#%V$K$J$C$F$$$^$9!#$G!"(B$B$b$C$H:$$C$?$3$H$K!"%W%j(B
$B%_%F%#%V$J$N$K%i%$%V%i%j$N$h$&$J3J9%$r$7$F$$$F!"8@8l;EMM$K$b%i%$%V%i%j(B
$B$G$"$k(B$B$+$N$h$&$K=q$$$F$"$k!#$^$C$?$/:$$C$?$b$s$@!#(B

 >    Pascal$B$K8BDj$9$k$N$O!"I,$:$7$bF10U$G$-$^$;$s$,!"(B
 >Pascal$B$O0-$/$O$J$$$H;W$$$^$9!#(B
 >    $B8@8l$,Ds6!$9$k35G0$,!"$-$A$s$H@0M}$5$l$F$$$k$H$$$&0UL#$G!"(B
      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 >$BI>2A$G$-$k$H;W$$$^$9!#(B

  $B$3$l$b13$G$9$h!#:,5r$N$J$$(B$B?@OC$G$9$h!#(B
  Pascal $B$N8@8l;EMM>e$N35G0$,Cx$7$/L$@0M}$G$"$k$3$H$O!"%3%s%Q%$%i5;=Q(B
$B$+%W%m%0%i%`0UL#O@(B$B$N>/$J$/$H$b0lJ}$rM}2r$7$F$$$k?M4V$K$O!"$h$/CN$i$l$F(B
$B$$$k$3$H$G$9!#LdBjE@$O$?$/$5$s$"$j$^$9$,!":GBg$N(B$BLdBjE@$O%W%j%_%F%#%V$H(B
$B%i%$%V%i%j$N6hJL$,ITL@3N$G$"$k$3$H$G$9!#>e5-$NF~=PNO$,$=$N0lNc$G$9!#$b(B
$B$&$R$H$D(B$B!"F0E*5-214IM}$^$o$j$bF1$8>u67$K$J$C$F$$$^$9!#$=$NB>!"%l%3!<%I(B
$B$NDj?t$,=q$1$J$1$l$P%l%3!<%I$N=i4|2=$b(B$B$G$-$J$$$H$+!"Bg0hC&=P$,(B goto $B$G(B
$B9T$J$&$7$+$J$$$H$+!"<jB3$-0z?t$N7?IU$1$,%0%A%c%0%A%c$@$H$+!"<jB3$-!?(B$B4X(B
$B?t8F$S=P$7$GL50z?t$N;~!"<jB3$-!?4X?t$=$N$b$N$H6hJL$,$D$+$J$$9=J8$G$"$k(B
$B$H$+!"LdBjE@$O;3$N$h$&$K$"$j(B$B$^$9!#(B
  $B$3$l$@$18@8l$NDs6!$9$k35G0$,%0%A%c%0%A%c$KL$@0M}$J8@8l$OB>$K$J$$$G$9(B
$B$M!#$7$+$b!"$3$l$@$1%0%A(B$B%c%0%A%c$J$N$K!"!V$-$l$$!W$@$H$+!VM}O@E*!W$@$H(B
$B$+?.$8$F$$$k86M}<g5A<T$,$?$/$5$s$$$k$N$b$9$4$$$G$9$h$M(B$B!#(B

  Pascal $B$,650i$K;H$($k8@8l$@$H$$$&$3$H$OH]Dj$7$^$;$s!#$?$@$7!"(B
$B!V(BPascal $B$O=hM}7OFHN)$J8@8l;EMM$@(B$B!W$H$+!V(BPascal $B$O8@8l;EMM$,@0M}$5$l$F(B
$B$$$k!W$H$+!V(BPascal $B$OM}O@E*$J8@8l$@!W$H$+$$$C$??@OC$r!"3X@8$K?a(B$B$-9~$s(B
$B$G$O$$$1$^$;$s!#(BPascal $B$N7g4Y$r65$($kB&$,$-$A$s$HM}2r$7$?>e$G!"(B
$B!V(BPascal $B$K$O$3$N$h$&$J7g4Y$,$"(B$B$k$+$i!"$H$j$"$($:$3$&2sHr$7$F$/$@$5$$!#(B
$B!J$=$7$F!"$"$J$?$,$?$,%W%m%0%i%_%s%08@8l$N@_7W$r$9$k;~$O!"$1(B$B$C$7$F!"F1(B
$B$8<:GT$r$7$J$$$G$/$@$5$$!#!K!W$H65$($l$P!"7W;;5!2J3X<T$rMW@A$9$k$N$K;H(B
$B$($J$$8@8l$G$O$J$$$H(B$B;W$$$^$9!#$?$@!"$=$l$@$C$?$i!"(BC $B$@$C$F>r7o$O$$$C$7$g(B
$B$G$7$g!#(B
  $B<B$O;d$O:#!"(BPascal $B$r;H$C$?%W%m%0%i%_(B$B%s%01i=,$rC4Ev$7$F$$$k$N$G$9$,!"(B
$B$=$N$h$&$K$3$3$m$,$1$F$$$k$D$b$j$G$9!#7W;;5!2J3X<T$r0i$F$k$N$K!"%W%m(B$B%0(B
$B%i%_%s%08@8l$r0l$D$@$1$7$+65$($J$$$J$s$F$3$H$O$"$jF@$J$$$+$i!"$?$/$5$s(B
$B$"$k8@8l$N$R$H$D$K$9$.$J$$$H(B$B$$$&$3$H$5$($-$A$s$H2!$($F$*$1$P!"(BPascal 
$B$4$H$-!"$=$s$J$K32$O$J$$$H9M$($F$$$k$H$$$&$N$,!"K\2;$+$b$7$l(B$B$^$;$s$,!#(B

$B!JC]2,$5!A$s!"$D$$$G$K=P$F$-$^$;$s$+!A!#!K(B
					$B3{(B $B9@Lw(B@$B>pJs2J3X2J(B.$BF`NI=w;RBg3X(B
Newsgroups: fj.lang.misc