%pi_hiba
clear all
pid=zeros(1,7);
pid(1)=[1  1 0 0 1 0 0 1 0]*2.^[1,0:-1:-7]';
pid(2)=[0 0 0 1 1 1 1 1]*2.^[0:-1:-7]'*2^-8;
pid(3)=[1 0 1 1 0 1 0 1]*2.^[0:-1:-7]'*2^-16;
pid(4)=[0 1 0 0 0 1 0 0]*2.^[0:-1:-7]'*2^-24;
pid(5)=[0 1 0 0 0 0 1 0]*2.^[0:-1:-7]'*2^-32;
pid(6)=[1 1 0 1 0 0 0 1]*2.^[0:-1:-7]'*2^-40;
pid(7)=[1 0 0 0 0 0 0 0]*2.^[0:-1:-7]'*2^-48;
format long
pidsum=sum(pid)
pistring='';
for ii=1:21
	d=fix(pid(1)); pistring=[pistring,num2str(d)]; pid(1)=pid(1)-d;
	if ii==1, pistring=[pistring,'.']; end
	pid=pid*10;
	if (rem(ii,2)==1)&(1+(ii+1)/2<=7), pid(1)=pid(1)+pid(1+(ii+1)/2); end
end
pistring
disp('3.14159265358979323846')
fprintf('%0.20f\n',eps)
fprintf('%.2f*eps/2\n',(23846-11599)/(22204/2))
disp('Ez nagyobb mint eps/2, de kisebb mint eps.')
