Утренняя пробежка
В первый день спортсмен пробежал x километров, а затем он каждый день увеличивал пробег на 10% от предыдущего значения. По данному числу y определите номер дня, на который пробег спортсмена составит не менее y километров.
Входные данные
Программа получает на вход действительные числа x и y
Выходные данные
Программа должна вывести одно натуральное число.
Исходный код на языке Pascal
var
a, b: real;
i, k: integer;
begin
read(a, b);
k := 1;
for i := 1 to 100 do
begin
if a >= b then
begin
writeln(k);
break;
end;
a := a + 0.1 * a;
k := k + 1
end;
end.