На зерновом складе в начальный момент было 18672 тонны зерна.Каждый день со склада вывозилось 0,5% зерна от общего количества. через сколько дней зерна станет меньше 20 тонн?
Answers & Comments
marick0073
Program timeSeed; const totalSeed=18672; lessThan=20; var Days:word; begin Days:=(totalSeed-lessThan+1) div round(totalSeed/200); write('Days - ',Days); readln; end.
Answers & Comments
const
totalSeed=18672;
lessThan=20;
var
Days:word;
begin
Days:=(totalSeed-lessThan+1) div round(totalSeed/200);
write('Days - ',Days); readln;
end.