?? p9104.pl0
字號:
PROGRAM MAIN;
CONST A=10;
VAR B,C;
PROCEDURE P;
VAR D;
PROCEDURE Q;
CONST E=5; VAR F;
PROCEDURE R;
VAR G;
BEGIN G:=A+E; F:=G;
WRITE(G)
END;
BEGIN CALL R; WRITE(F);
F:=A+E*F; WRITE(F,D)
END;
BEGIN D:=A+B; WRITE(D); CALL Q END;
PROCEDURE S;
BEGIN CALL P; B:=-10; WRITE(B) END;
BEGIN
B:=8;
READ(C);
WHILE C>0 DO
BEGIN
WRITE(B); CALL S;
B:=B+C; WRITE(B);
READ(C)
END;
CALL P
END.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -