随机模拟事件操作系统实验delphi