На зерновом складе в начальный момент было 18672 тонны зерна.Каждый день со склада вывозилось 0,5% зерна от общего количества. через сколько дней зерна станет меньше 20 тонн?

program timeSeed; const  totalSeed=18672;  lessThan=20; var  Days:word;begin Days:=(totalSeed-lessThan+1) div round(totalSeed/200); write('Days - ',Days);  readln;end.