a guest Jul 11th, 2018 58 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- algcong := proc (a, c, m, x0i, n) local x, x0, i; x0 := x0i; for i to n do x := `mod`(a*x0+c, m); x0 := x; print(x) end do end proc
RAW Paste Data