Thread View: fj.lang.pascal
2 messages
2 total messages
Started by C00279
Wed, 08 Jan 1997 00:00
Re: Pascal/Delphi
Author: C00279
Date: Wed, 08 Jan 1997 00:00
Date: Wed, 08 Jan 1997 00:00
71 lines
2589 bytes
2589 bytes
$B2,K\!w6bBtBg3X$G$9!#(B
<5atb87$ns6@doc.dpc.ehime-u.ac.jp>$B$N5-;v$K$*$$$F!'(B
$B!d(B>> $B!!(BFACOM$B$N(BPASCAL$B$G$b<!$N$h$&$K4JC1$G$9!#(B
$B!d(B>>
$B!d(B>> //$B!!#J#O#BJ8(B
$B!d(B>> // EXEC PASCG
$B!d(B>> //PAS.SYSIN DD *
$B!d(B>> PROGRAM DEMO;
$B!d(B>> BEGIN
$B!d(B>> WRITELN('SAMPLE PROGRAM');
$B!d(B>> END.
$B!d(B>> /*
$B!d(B>> //
$B!d(B
$B!d(B
$B!d(B $B$$$d!"I8=`F~=PNO$@$1;H$($l$PNI$$$H$$$&>l9g$P$+$j(B
$B!d$G$O$J$$$G$9$h$M!#F1;~$KJ#?t$NF~NO$d=PNO$,I,MW$K$J(B
$B!d$k>l9g$b$"$j$^$9!#(B
$B!!J#?t$N%U%!%$%k$r07$&%P%C%A%8%g%V$NNc$O<!$N$h$&$K$J$j$^$9!#(B
// $B#J#O#BJ8(B
// EXEC PASCG
//PAS.SYSIN DD *
PROGRAM DEMO;
VAR F1, F2 : TEXT;
BEGIN
WRITELN('SAMPLE PROGRAM');
WRITELN(F1,'SAMPLE FILE - 1');
WRITELN(F2,'SAMPLE FILE - 2');
END.
/*
//GO.F1 DD SYSOUT=A
//GO.F2 DD SYSOUT=A
//
$B!d(B>> $B!!B?BV@-$O!"(BTurbo Pascal 5.5$B$J$$$7(BObject Pascal/Delphi$B$K$*$$$F$O(B
$B!d(B>> $B%/%i%97?!J(BTP$B$G$O%*%V%8%'%/%H7?!K$NBeF~8_49@-$K4X$9$k35G0$G$9!#(B
$B!d(B
$B!d(B
$B!d(B $B$&!<$s!"$3$A$i$O7Q>5$N35G0$G$O$J$$$N$G$9$+!)(B $B4p(B
$B!dDl%/%i%9(B($B%9!<%Q!<%/%i%9(B)$B$r%3%s%F%J$H$7$F;H$($k$H$$(B
$B!d$&$d$D$G$9$h$M!#$b$A$m$s!"2>A[4X?t(B($B%a%=%C%I$H%a%C(B
$B!d%;!<%8$NF0E*7k9g(B)$B$,Mm$s$G$/$l$P!"B?BV@-$K$b$J$j$^(B
$B!d$9!#(B
$B!!$b$A$m$s!"B?BV@-$O7Q>5$rA0Ds$H$7$F$$$^$9!#(B
$B!!(BDelphi2.0$B$G$N%/%i%97?$O$9$Y$F(BTObject$B7?$r7Q>5$7$F$$$^$9!#(B
$B!!(BDelphi$B$K$*$$$F!"%a%=%C%I$K(Bvirtual$B$H$+(Bdynamic$B$N;XDj$,$G$-$^$9$,!"(B
$B$3$l$i$HMm$a$J$/$F$bB?BV@-$N9M$(J}$O@.N)$7$^$9!#(B
$B!d(B $B$9$$$^$;$s!#87L)$K=q$+$J$+$C$?$N$G8m2r$J$5$l$?$h$&(B
$B!d$G$9$M!#7Q>5$dB?BV@-$r;H$&$N$O:#F|E*2r7h:v$J$N$G$"$C(B
$B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!0!0!0!0!0!0(B
$B!d$F!VBeMQ!W$G$O$"$j$^$;$s!#(BC++ $B$K$*$$$F$O%/%i%9$N(B
$B!d(Bprivate $B%a%=%C%I$r;H$&$3$H$b$G$-$^$9$7!"F~$l;R$N%/%i(B
$B!d%9$r;H$&$3$H$b$G$-$^$9!#BeMQ$O$3$l$G=<J,$G$9!#(B
$B!!2?$r2r7h$9$k$N$+$H$$$&$3$H$G$9!#(B
$B!!%m!<%+%k$J4X?t$r$o$6$o$6F~$l;R$N%/%i%9$GBeMQ$7$h$&$H$9$k(B
$BI,MW$O$J$$$N$G$O!)(B
$B2,K\0B@2(B
C00279@sinet.ad.jp
Re: Pascal/Delphi
Author: okahisa
Date: Wed, 08 Jan 1997 00:00
Date: Wed, 08 Jan 1997 00:00
83 lines
3746 bytes
3746 bytes
$B2,5W!w0&I2Bg3X$G$9!#(B
<E3o4w4.209@info.sinet.ad.jp>$B$N5-;v$K$*$$$F(B
C00279@sinet.ad.jp$B$5$s$O=q$-$^$7$?!#(B
>> $B!!J#?t$N%U%!%$%k$r07$&%P%C%A%8%g%V$NNc$O<!$N$h$&$K$J$j$^$9!#(B
>> // $B#J#O#BJ8(B
>> // EXEC PASCG
>> //PAS.SYSIN DD *
>> PROGRAM DEMO;
>> VAR F1, F2 : TEXT;
>> BEGIN
>> WRITELN('SAMPLE PROGRAM');
>> WRITELN(F1,'SAMPLE FILE - 1');
>> WRITELN(F2,'SAMPLE FILE - 2');
>> END.
>> /*
>> //GO.F1 DD SYSOUT=A
>> //GO.F2 DD SYSOUT=A
>> //
$B$3$N;~!"(BF1, F2 $B$OJQ?tL>$G$"$j%U%!%$%kL>$H$b$J$C$F$$$k(B
$B$N$G$7$g$&$+!)(B $B$@$H$7$?$i!"$d$O$j;d$OLLE]$@$H;W$$$^$9!#(B
program $B@k8@$NItJ,$O$I$&$d$i>JN,$G$-$k$_$?$$$G$9$,!#$b$A(B
$B$m$s!"<B83<B=,$K$O$=$l$G=<J,$@$H8@$o$l$l$PH]Dj$O$7$^$;$s!#(B
>> $B!d(B>> $B!!B?BV@-$O!"(BTurbo Pascal 5.5$B$J$$$7(BObject Pascal/Delphi$B$K$*$$$F$O(B
>> $B!d(B>> $B%/%i%97?!J(BTP$B$G$O%*%V%8%'%/%H7?!K$NBeF~8_49@-$K4X$9$k35G0$G$9!#(B
($BCfN,(B)
>> $B!!$b$A$m$s!"B?BV@-$O7Q>5$rA0Ds$H$7$F$$$^$9!#(B
>> $B!!(BDelphi2.0$B$G$N%/%i%97?$O$9$Y$F(BTObject$B7?$r7Q>5$7$F$$$^$9!#(B
>> $B!!(BDelphi$B$K$*$$$F!"%a%=%C%I$K(Bvirtual$B$H$+(Bdynamic$B$N;XDj$,$G$-$^$9$,!"(B
>> $B$3$l$i$HMm$a$J$/$F$bB?BV@-$N9M$(J}$O@.N)$7$^$9!#(B
$BBeF~8_49@-$N$3$H$r8@$C$F$*$i$l$?$N$G!"$3$l$rB?BV@-$K(B
$B7k$S$D$1$k$H$9$k$H!"2>A[7k9g!&F0E*7k9g$r9M$($k$3$H$K$J(B
$B$k$+$J$H;W$$$^$7$?!#2<0L%/%i%9$r<u$1<h$l$F$b!"2>A[7k9g(B
$BF0E*7k9g$r;H$o$J$$$J$i!"F1$8%3!<%I$,8F$S=P$5$l$F$$$k$@(B
$B$1$G$9$N$G!"B?BV@-$r8l$k$K$O=<J,$H$O8@$($J$$$G$7$g$&!)(B
>> $B!!2?$r2r7h$9$k$N$+$H$$$&$3$H$G$9!#(B
>> $B!!%m!<%+%k$J4X?t$r$o$6$o$6F~$l;R$N%/%i%9$GBeMQ$7$h$&$H$9$k(B
>> $BI,MW$O$J$$$N$G$O!)(B
$B$=$NDL$j$J$N$G$9$,(B... $BBeMQ$9$k$K$O=<J,$J$N$G$"$C$F!"(B
$B4X?tFb4X?t<+?H!":#F|$G$O$=$s$J$K;H$o$J$$$N$G$O$J$$$+$H(B
$B$$$&$3$H$G$9!#(B
$B$3$N5DO@$,$O$8$^$C$?$H$-!"(BC $B$K$O4X?tFb4X?t$,I8=`$G$O(B
$B$J$$$+$i(B PASCAL $B$NJ}$,650iMQ$KNI$$$H$$$&$3$H$r8@$C$F$*(B
$B$i$l$?$H;W$$$^$9!#$7$+$7(B GCC $B$K$O3HD%$H$7$FB8:_$9$k$7!"(B
$B$^$?!"(BANSI C $B$G$b%U%!%$%k%9%3!<%W$r;H$&$H$$$&<j$,$"$j$^(B
$B$9!#(B C++ $B$^$G;H$&$3$H$r5v$7$F$b$i$($k$J$i!"=<J,BeMQ$9$k(B
$B5!G=$,$"$j$^$9!#$^$?!":#F|!"4X?tFb4X?t$O$=$l$[$I=E;k$5(B
$B$l$F$$$^$;$s$7!"650iMQ8@8l$K(B PASCAL $B$,E,$7$F$$$k$H$$$&(B
$B$N$O2a5n$N$3$H$G$O$H$$$&$N$,;d$N9M$($G$9!#(B
$B!t(B PASCAL $B$r;H$&2ACM$,$J$$$J$s$F8@$C$F$k$s$8$c$J$$$G$9(B
$B!t(B $B$h!#;H$&2ACM$rG'<1$G$-$k?M$,;H$($PNI$$$N$G$9!#(B
$B>/$J$/$H$b!"(BPASCAL $B$K$O!"%*%V%8%'%/%H;X8~;Y1g5!G=$,L5(B
$B$$$N$G!"$H$j$?$F$F(B C $B$h$j650iMQ$KE,@Z$G$"$k$H$O;W$($^$;(B
$B$s!#BP$7$F(B C $B$O!"=q@R$NN`$,F~<j$7$d$9$$$H$$$&=EMW$JI>2A(B
$B%]%$%s%H$,$"$j$^$9!#NI$$=q@R$O>/$J$$$+$bCN$l$^$;$s$,A*(B
$BBr$NM>CO$,L5$$!"$b$7$/$O<j$KF~$i$J$$$h$j$O$^$7$G$9!#(B
$B$^$"!"8&5f<<$NB?$/$,(B PASCAL $B$rI,MW$H$7$F$$$k$H$$$&$J(B
$B$iOC$OJL$G$9$M!#;d$,8@$$$?$$$N$O%i%F%s8l$h$j1Q8l$r65$((B
$B$?J}$,Lr$KN)$D$N$G$O!)(B $B$H$$$&$3$H$G$9!#(B
$B!t(B $B7+$jJV$7$^$9$,!"(BWindows $B4D6-$,@0$C$F$$$k$J$i!"(BDelphi
$B!t(B $B$OHs>o$KNI$$A*Br$@$H;W$$$^$9!#(BDelphi $B$N=q@R$O$?$/$5$s(B
$B!t(B $B$"$j$^$9$7$M(B (^^; $B3F8&5f<<$,$d$C$Q$j(B C $B$H8@$o$l$k$H%@(B
$B!t(B $B%a$G$9$1$I!#(B
--
Email: okahisa@cs.ehime-u.ac.jp
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads