z_urandomm

procedure z_urandomm(

  var rop: MPInteger;

  var state: MPRandState;

  var n: MPInteger

);

function z_urandomm(

  var state: MPRandState;

  var n: MPInteger

):MPInteger;