clear all
clc 
N = 100000000;
f = zeros (N,2);
prcnt_step = N/100;
prcnt_count = 0
for i = 1:1:N
    f(i,1) = randn;
    if mod(i,prcnt_step)==0
        clc
        fprintf('complete %d%%', prcnt_count + 1);
        prcnt_count = prcnt_count + 1;
    end;
end;
% histfit(f(:,1))