Форум » Обработка целых чисел » Задача 17-32 - не сходится ответ » Ответить

Задача 17-32 - не сходится ответ

Поляков: Людмила пишет [quote]Рассматривается множество целых чисел, принадлежащих числовому отрезку [1000; 9999], запись которых в шестеричной системе имеет не более 5 цифр и закачивается на 13 или 14. Найдите количество таких чисел и максимальное из них. Решаю так: [pre2] var n,count,max:integer; begin count:=0; max:=0; for n:=1000 to 6*6*6*6*6-1 do if (n mod 36= 13) or (n mod 36=14) then begin count:=count+1; max:=n; end; writeln(count, ' ',max); end.[/pre2] Получается ответ 376 7754, на сайте 376 7750. [/quote]

Ответов - 5

Поляков: Поляков пишет: if (n mod 36= 9) or (n mod 36=10)

maga777: [pre2] k = 0 m = 0 for i in range(1000, 10000): if i >= 6**4 and (i // 6) % 6 == 1 and (i % 6 == 3 or i % 6 == 4): k += 1 if i > m: m = i print(k, m)[/pre2] что не так с кодом?

Поляков: maga777 пишет: i >= 6**4 Если это задача 32, то вы не так поняли условие.


lokinl8: почему if (n mod 36= 9) or (n mod 36=10) , а не if (n mod 36= 13) or (n mod 36=14) then

Поляков: lokinl8 пишет: почему if (n mod 36= 9) or (n mod 36=10) , а не if (n mod 36= 13) or (n mod 36=14) then Потому что 13 и 14 нужно перевести из шестеричной системы в десятичную.



полная версия страницы