clear all
fp=fopen('file01.dat','r');
for i=1:100
    [xytmp,count]=fscanf(fp,'%f %f',2);
    if count~=2
        fclose(fp);
        break;
    end
    x(i)=xytmp(1);
    y(i)=xytmp(2);
    disp(sprintf('x(%d)=%g y(%d)=%g',...
        i,x(i),i,y(i)));
end
x=x';
y=y';
