📅  最后修改于: 2022-03-11 14:56:44.206000             🧑  作者: Mango
1 l pic 99 1 s pic x(26) value'aeiouybcdfghjklmnpqrstvwxz' 1 r
pic 99 1 v pic 9 1 q pic 99. accept q perform test after varying
l from 1 by 1 until l>9 compute v=function mod(l,2) compute r=1+
function random(q*l)*5+v*15+v*5 display s(r:1)end-perform exit