Паскаль. Сумму в S руб. положили в банк. При этом прибыль

Забавная задачка.
Если каждый год к начальной сумме прибавляется Sk/100, то за n лет надбавка составит Skn/100, а общая сумма составит S+Skn/100.
И эта сумма обязана быть больше либо одинакова xS.
S+Skn/100 xS
1+kn/100 x
kn/100 x-1
n 100(x-1)/k, округлое до ближайшего большего целого.

Как видно, сумма S вообще не нужна, а прочее просто рассчитывается на калькуляторе и даже "в столбик". Но Паскаль, так Паскаль...

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var (k,x):=ReadReal2('Введите процент k и кратность x:');
  Writeln('Нужно лет: ',Ceil(100*(x-1)/k))
end.

Пример
Введите процент k и кратность x: 13.5 3
Нужно лет: 15