Question: Problem with printing out values

To begin with my code is:

with(Statistics);

N:=RandomVariable(Normal(5,2))

for i from 1 by 1 to 100 do

OS[i]:=Sample(N,50)

end do

for i from 1 by 1 to 100 do

 print(i)

  from j from 1 by 1 to 1000 do

    BS[i,j]:=Bootstrap('Mean',OS[i],replications=1)

  end do

end do

My goal is to produce as an output in the software's screen the values of 1000 bootstrap means for each of 100 original samples in order to export the results to Excel. Based on my basic knowledge of programming I thought that I can do that through the use of the vectors. Unfortunately though when I trigger the operation the software seems to be evaluating (with the homonymous indication in the bottom left corner of the screen) it for an indefinite period of time, obliging me to stop it at some point. However, let me point out that when I do the same process for i and j 4 and 10 for example then I have results, therefore presumably my code is correct. I know that I can do the same operation in Excel and I have already created a respective macro, however I wanted to use Maple in order to take advantage of its fast operation of calculations, which is pointless in case that I have to wait more time for the results than I have already waited to be eventually produced.

Any thought and idea would be appreciated, thank you very much in advance!