📄 tst2550.mal
字号:
# Factory functions seem to provide a better control structurefactory random(seed:int) (noes:bit,val:int); i:= seed;barrier L:= true; i:= 125 *i; i:= i % 32767; yield (noes,val):=(true,i); redo L;exit L; return (noes,val):=(false,seed);end;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -