Форум » Обработка целых чисел » ЕГЭ задание 25. 3753 » Ответить
ЕГЭ задание 25. 3753
NotScream: Здравствуйте! Пытался решить эту задачу на Паскале, но он бесконечно ищет решение. Не могу понять, в чём проблема, если можете, подскажите, в чём ошибка или как-то по-другому надо решать задачу. Вот моё нерешение: [pre2] var n,i,m,c:integer; s:string; begin for i:=113000000 to 114000000 do begin s:=''; c:=0; for n:=2 to i div 2 do begin if i mod n = 0 then begin s:=s+n+' '; if n mod 2 = 0 then c:=c+1; if c>3 then break; end; end; if i mod 2 = 0 then c:=c+1; if c=3 then writeln(s,i); end; end.[/pre]
Ответов - 6
Поляков: Очень большие числа, лобового перебора не дождетесь. Нужно хотя бы сообразить, что если делителей нечётное количество, то это полный квадрат какого-то числа. Это задача 25.148 из основного сборника. Посмотрите авторское решение на сайте.
NotScream: А можете дать ссылку, где можно посмотреть. Я просто не сильно разбираюсь в вашем сайте: знаю только форум и страницы, где можно составить варианты для ЕГЭ
Поляков: NotScream пишет: А можете дать ссылку, где можно посмотреть. Здесь.
Надежда08: Доброго времени суток. Помогите, пожалуйста. ### uses school; (113000000..114000000).Sel(x->(x,x.Divisors)) .Sel(\(x,d) -> (x,d.Wh(i->(i mod 2=0)).ToA)) .Wh(\(x,d) -> d.Len=3) .Sel(\(x,d) -> (x,x.divizors.ToA)) .Sel(\(x,d) -> (x,|d[^4]|)).PrintLines; Вот ответ (113010578,[7517]) (113191058,[7523]) (113371682,[7529]) (113612738,[7537]) (113733362,[7541]) (113914418,[7547]) (113974802,[7549]) Но....это же ТРЕТЬИ по величине нетривиальные делители....т.е. четвертые из всех. Спасибо))
Поляков: Надежда08 пишет: Но....это же ТРЕТЬИ по величине нетривиальные делители....т.е. четвертые из всех. Возьмем первое число 113010578. Его делители: [1, 2, 7517, 15034, 56505289, 113010578]. Второй нетривиальный делитель - 7517.
Надежда08: Спасибо. Почему-то я восприняла критерий отбора как ВТОРОЙ по величине(( т.е. второй наибольший((((((( туплю))))
полная версия страницы