编制页面置换算法的模拟程序。
要求：
(1) 用随机数方法产生页面走向，页面走向长度为L。
(2) 根据页面走向，分别采用FIFO和LRU算法进行页面置换，统计缺页率。
(3) 假定可用内存块和页表长度 (作业的页面数)分别为m和k，初始时，作业页面都不在内存。
随机数产生程序：
function random: real:
begin   Seed: =125.0(seed+1.0)
       Seed: =Seed8192.0trunc (seed/8192)
       random: = (Seed+0.5)/8192
end;
上述随机数发生函数产生的随机数为0.0~1.0，稍另变化就可得到0~n1之间的随机数。
程序开始时，应对变量Seed (实型)赋初值。
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
请各位高手帮我看看这个怎么做？？？？？