代码搜索：如何学习 PL？
找到约 10,000 项符合「如何学习 PL？」的源代码
代码结果 10,000
www.eeworm.com/read/176083/9517978
pl0 pemeppemm.pl0
PROGRAM PEMEPPEMM;
VAR TEST1,TEST2,TEST3,TEST4:INTEGER;
BEGIN
TEST1:=1+++2;
TEST2:=2--;
TEST3:=4;
TEST4:=5;
TEST3+=TEST1;
TEST4-=TEST2+1;
WRITE(TEST1,TEST2,TEST3,TEST4);
END.
www.eeworm.com/read/176083/9517980
res pl01.res
www.eeworm.com/read/176083/9517985
obj pl01.obj
www.eeworm.com/read/176083/9517994
pl0 ftd.pl0
PROGRAM FTD;
VAR
I:INTEGER;
BEGIN
FOR I:=3 DOWNTO 1 DO
WRITE(I);
FOR I:=0 TO 3 DO
WRITE(I)
END.
www.eeworm.com/read/176083/9517997
pl0 funpara.pl0
PROGRAM SDF;
VAR
X,Y:INTEGER;
FUNCTION MC(A,B:INTEGER):INTEGER;
VAR M,C:INTEGER;
BEGIN
M:=A;
C:=B;
WRITE(A,B);
MC:=M+C;
END;
FUNCTION KFC(C,D:INTEGER):INTEGER;
VAR K,F:INTEGER;
BEGIN
www.eeworm.com/read/176083/9518001
pl0 swap.pl0
PROGRAM SSWAP;
VAR
A,B:INTEGER;
FUNCTION SWAP(VAR C,D:INTEGER):INTEGER;
VAR
TEMP:INTEGER;
BEGIN
TEMP:=C;
C:=D;
D:=TEMP;
END;
BEGIN
A:=3;
www.eeworm.com/read/176083/9518003
cpp pl01.cpp
//---------------------------------------------------------------------------
#include
#pragma hdrstop
USERES("PL01.res");
USEFORM("Unit1.cpp", Form1);
//-------------------------------
www.eeworm.com/read/176083/9518009
pl0 ric.pl0
PROGRAM RIC;
VAR
R:REAL;
I:INTEGER;
C:CHAR;
BEGIN
READ(R,I,C);
R:=R/13+12*1;
I:=I DIV 3+12 MOD 3;
WRITE(C);
C:='A';
WRITE(R,I,C);
END.
www.eeworm.com/read/176083/9518010
pl0 else.pl0
PROGRAM else;
VAR I,MAX, X,Y:INTEGER;
BEGIN
READ(I,X,Y);
IF I>X THEN
MAX:=I
ELSE MAX:=X;
IF Y>MAX
THEN MAX:=Y;
WRITE(MAX);
END.