代码搜索:如何学习 PL?
找到约 10,000 项符合「如何学习 PL?」的源代码
代码结果 10,000
www.eeworm.com/read/379669/9189945
pl0 ppemme.pl0
PROGRAM XYZ;
VAR
TEST1,TEST2,TEST3,TEST4:INTEGER;
BEGIN
TEST1:=3*10+++12;
TEST2:=3+44--;
TEST3:=10;
TEST4:=33;
TEST3+=TEST1*12+3;
TEST4-=TEST2 DIV 12 +1+3++;
WRITE(TEST1,TEST2,TEST3,TEST
www.eeworm.com/read/379669/9189949
exe pl01.exe
www.eeworm.com/read/379669/9189951
tds pl01.tds
www.eeworm.com/read/379669/9189958
pas pl0.pas
PROGRAM PL0(INPUT,OUTPUT,INPUT1,OUTPUT1);
(*PL0 COMPILER WITH CODE GENERATION*)
LABEL
99;
CONST
AL=10; (*LENGTH OF IDENTIFIERS*)
NORW=14; (*# OF RESERVED WORDS*)
TXMAX=100; (*LE
www.eeworm.com/read/379669/9189972
res pl01.res
www.eeworm.com/read/379669/9189975
obj pl01.obj
www.eeworm.com/read/379669/9189992
cpp pl01.cpp
//---------------------------------------------------------------------------
#include
#pragma hdrstop
USERES("PL01.res");
USEFORM("Unit1.cpp", Form1);
//-------------------------------
www.eeworm.com/read/379669/9189995
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/379669/9189999
pl0 else.pl0
PROGRAM P1;
VAR I,MAX:INTEGER; 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.