clc;
clear;
a=zeros(15,1);
b=zeros(15,1);
c=zeros(15,1);
fp1=fopen('G:\txt\rand1.txt','r');
fp2=fopen('G:\txt\time.txt','w');
for i=1:100000
aa=fscanf(fp1,'%f',15*1);
a=reshape(aa,15,1);
b=round(a*10000);
c=mod(b,100);
    for m=1:15
        fprintf(fp2,'%d\n',c(m,1));
    end
end