new file.
input Program.

SET SEED RANDOM.
vector #r(4).
compute #r(1) = 40.
compute #r(2) = 35.
compute #r(3) = 30.
compute #r(4) = 25.

* compute #n = 100.

loop j = 1 to 4.
compute #n = #r(j).
loop i = 1 to #n.
IF (j=1) x = rv.normal(24,5) .
if (j =2) x = rv.normal(30,2).
IF (j=3) x = rv.normal(24,15) .
IF (j=4) x = rv.normal(24,.5) .
leave i,j,x.
end case.
end loop.
end loop.
end file.
end input program.
execute.