Stefka
Переведите код на питоне в паскальВот кодstart, end = 586132, 586430def allDivs( x ):divs = [1, x]d = 2while d*d <= x:if x % d == 0:divs. append( d )if x // d > d:divs. append( x//d )d += 1return sorted(divs)minDivs = [ ]maxDivs = [ ]for x in range( start, end+1 ):divs = allDivs( x )if len(divs) >= len(maxDivs):maxDivs = divsif len(divs) > len(minDivs):minDivs = divsprint( len(minDivs), minDivs[-1], minDivs[-2] )print( len(maxDivs), maxDivs[-1], maxDivs[-2] )
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Чтобы ответить необходимо зарегистрироваться.