代码搜索：PL 有哪些应用？
找到约 10,000 项符合「PL 有哪些应用？」的源代码
代码结果 10,000
www.eeworm.com/read/433086/8548478
pl write_switch.pl
use Expect;
use strict;
use warnings;
sub readdata{
open(FILEHANDLE,"change.txt")||die"can not open filename:$!";
my(@array)=;
chomp@array;
close(FILEHANDLE);
return(@array);
}
www.eeworm.com/read/388849/8571401
cat pl2303.cat
www.eeworm.com/read/187628/8613523
res pl0.res
www.eeworm.com/read/187628/8613535
exe pl0.exe
www.eeworm.com/read/187628/8613552
cpp pl0.cpp
//---------------------------------------------------------------------------
#include
#pragma hdrstop
USERES("PL0.res");
USEFORM("Unit1.cpp", Form1);
//-------------------------------
www.eeworm.com/read/187628/8613573
pl0 max.pl0
PROGRAM MAIN;
VAR A,B,C,MAX;
BEGIN
READ(A,B,C);
IF A>B THEN
MAX:=A
ELSE MAX:=B;
IF C>MAX THEN
MAX:=C;
WRITE(MAX)
END.
www.eeworm.com/read/187628/8613599
pl0 becomes.pl0
PROGRAM BECOMES;
CONST A=10;
VAR B,C;
PROCEDURE P;
BEGIN
C+=B*A;
WRITE(C);
END;
PROCEDURE Q;
BEGIN
C-=B*A;
WRITE(C);
END;
BEGIN
READ(C);
READ(B);
WHILE B0 DO
BEGIN
www.eeworm.com/read/187628/8613614
pl0 forto.pl0
PROGRAM FORTO;
VAR A,B,C;
BEGIN
A:=88;
FOR B:=1 TO 10 DO
BEGIN
C:=A-B;
write(B);
WRITE(C);
END
END.
www.eeworm.com/read/187628/8613618
pl0 fordownto.pl0
PROGRAM FORDOWNTO;
CONST A=88;
VAR B,C;
BEGIN
FOR B:=50+1 DOWNTO 10*2 DO
BEGIN
C:=A-B;
write(B);
WRITE(C);
END
END.