CLSINPUT NDIM A(N), B(N)FOR i = 1 TO N A(i) = INT(RND * 100)NEXT imin = A(1)FOR i = 2 TO N IF A(i) < min THEN min = A(i)NEXT iFOR i = 1 TO N A(i) = min * A(i)NEXT iFOR i = 1 TO N B(i) = INT(RND * 100)NEXT imin = B(1)FOR i = 2 TO N IF B(i) < min THEN min = B(i)NEXT iFOR i = 1 TO N B(i) = min * B(i)NEXT iFOR i = 1 TO N PRINT A(i);NEXT iPRINTFOR i = 1 TO N PRINT B(i);NEXT i
Обозначим неизвестное нам основание как x. По общей формуле представления чисел в позиционной системе счисления (поищите в сети саму формулу, на этом ресурсе ссылки, к сожалению, запрещены:) ) 30 можно представить как 3*x^1 + 0*x^0 т.е. 3x и приравнять к 24. Выходит:
3x = 24
x = 8
Основание неизвестной системы счисления: 8.
Если есть вопросы по поводу решения - оставляйте в комментариях:)
1985 год выпуска, переводим и получаем:
110011000101
Ответ: 6 единиц
24710 = 2*5*7*353
-----------------------------------------------------
N=2 24710 (10cc) = 10000010000110 (2cc)
N=5 24710 (10cc) = 1242320 (5cc)
N=7 24710 (10cc) = 132020 (7cc)
N=14 24710(10cc) = 9010 (14cc)
N= 35 24710 (10cc) = K60 (35cc)
---------------------------------------------
ответ: N1=2 N2=5 N3=7 N4=14