Determina a precisão de uma máquina

clear all, clc, close all,
EPS=1;
EPS1=2;
while(EPS1>1)
    EPS=EPS/2;
    EPS1=EPS+1;
end
disp('A MAQUINA ACHA QUE');
EPS
disp('VALE ZERO')
pause