?? test.pl0
字號:
/*這是一個測試程序*/
Program abc;
Integer x,y,z; /*變量聲明*/
Real a,b;
Procedure ab(Var m,n:Integer; t:Real); /*過程*/
Begin
t:=n+m;
If m>n then /*條件語句*/
n:=m
else
t:=m;
While n<m do /*循環語句*/
Begin
n:=n+1
End
End;
Begin
x:=1;y:=2;z:=3;
Call ab(x,y,z);
z:=4+z+(1+2+6+x)*3*y*5+7;
If ~ 3<=x & y<>4 then z:=0; /*條件表達式*/
y:=219; z:=37; x:=y*z /*賦值語句*/
End
. /*程序結束符*/
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -