PL0+language 源代码
汇集 PL0+language 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
PROGRAM EX01; CONST A=10; VAR B,C,D; ARRAY E[1:10]; BEGIN READ(B,C); IF BC THEN BEGIN B+=C; C++; WRITE(C) END ELSE BE…
//--------------------------------------------------------------------------- #include #pragma hdrstop USERES("PL0.res"); U…
PROGRAM EX011; VAR A,B,C; BEGIN A:=88; READ(B); C:=A-B; C:=++A; WRITE(C); ++A; IF B0 THEN C-=A+B ELSE …
PROGRAM EX01; VAR A,B; BEGIN A:=88; B:=11; WRITE(A); END.
PROGRAM MAIN; CONST A=10; VAR B,C; PROCEDURE P; BEGIN END; PROCEDURE S; BEGIN END; BEGIN B:=8; READ(C); WHILE C>0 …
PROGRAM EX0111; VAR A,B,C; BEGIN A:=88; read(B); C:=A-B; A--; WRITE(A); IF B0 THEN C+=A+B ELSE C-=A*B;…
PROGRAM EX01; CONST A=10; VAR B,C,D; ARRAY E[1:10]; BEGIN READ(B,C); IF BC THEN BEGIN B+=C; C++; WRITE(C) END ELSE BE…
program T2; CONST I=5, B=20; C=1, D=2; VAR J, K,X,Y; PROCEDURE P; BEGIN J:=I END; PROCEDURE Q; BEGIN J:=I END; BEGI…