function ukol1_reseni(s)
% ukol1_reseni(s)
% kolik clenu harmonicke rady musime nejmene secist, 
% aby tento castecny soucet rady mel hodnotu alespon s

i = 1;
suma = 0;
while suma < s
    suma = suma + 1/i;
    i = i + 1;
end

n = i - 1;

% vypis vysledku
disp(['Potrebujeme minimalne ', num2str(n), ' clenu (castecny soucet cini ', num2str(suma, '%.15f') ,').'])

% konec