Найти точное кол-во страниц невозможно. можно только определить диапазон значений, в котором оно находится: 1 цифра - от 1 до 9, 3 цифры - от 100 до 999 и т. д. : от 10 ** (n - 1) до 10 ** n - 1 включительно. где ** - возведение в степень. если же n - общее кол-во цифр на всех страницах, то для первых 9 страниц понадобится 9 цифр, для следующих 100 страниц - 200 цифр, для следующих 1000 страниц - 3000 цифр и т. д. прибавляем 1 к n и получаем ряд 10, 200, 3000, 40000, 500000, 6000000, 70000000, 800000000 readln(n); inc(n); mul : = 100000000; coun : = -1; for i : = 8 downto 1 do begin tmp : = n div (mul * i); n : = n mod (mul * i); mul : = mul div 10; inc(count, tmp * mul) end; inc(count, n); writeln(count)
emik071089
15.11.2021
Это произведение значит, что число в результате будет делиться и на 1, и на 2, и на 3, и на 4, и на 5. посмотрим на последнее число произведения, это 5, это значит, что число, которое получится в результате этого произведения будет заканчиваться или 5 или 0 (признак деления на 5). далее посмотрим на предпоследнее число - 4, это значит, что число будет чётным, то есть предположение, что произведение будет заканчиваться на 5 можно исключить, из этого следует, что последней цифрой произведения будет 0. удачи!