📄 test.pas
字号:
program //jjjj
integer a1 ,a2;//kkk
logical b1
begin
procedure my()
begin
procedure myy(integer a4,a5)
begin
write a4-a5
end
call myy 10 8
end
procedure my1()
begin
write 111
end
call my ;
call my1;
b1:=true;
a1:=100;
a2:=1000;
if b1 then
write a1
else
write a2
end
end.
//procedure my(integer a8,a3)
//begin
//procedure myy(integer a4,a5)
//begin
//write a4-a5
//end
//call myy a8 a3
//end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -