mincislo = 1.0;
while mincislo > 0.0,
    predchozi_mincislo = mincislo;
    mincislo = mincislo/2;
end

format shortE
predchozi_mincislo