  function Feb1()
% Largest power of 10 that can be stored in IEEE double format
% Fact 1:  10^k = 5^k * 2^k
% Fact 2: The mantissa will be in charge of storing 5^k.
% Fact 3: We will run out room in the mantissa long before we
%         Run out of room in the exponent (which can be as large as 1023)
% Fact 4: It takes ceil(log2(n)) bits to encode a positive integer n

n = 5;
k = 0;
while ceil(log2(n))<=53
    n = 5*n;
    k = k+1;
end
clc
fprintf('10^%1d is the largest power of ten that can be represented\n',k)