def fc
(n
:Int, i
:Int
= 2):Int
=
val set
=(4 to
196).
filter(n
=> (2 to n/
2).
map(k
=> fc
(k
*(n-k
))).
min>=2).
toSet
def fp
(n
:Int, i
:Int
= 2):List
[(Int,Int
)] = else if (n
%i
==0 && set.
contains(i+n/i
)) (i,n/i
) :: fp
(n,i+
1)
val map
=(4 to
99*99).
map(fp
(_)).
filter(_.
length==1).
groupBy(el
=> el.
head.
_1+el.
head.
_2
)
println(map.filter(_._2.length==1).head._2(0)(0))
}
b2JqZWN0IE1haW4gZXh0ZW5kcyBBcHAgewogIGRlZiBmYyhuOkludCwgaTpJbnQgPSAyKTpJbnQgPSAKICAgIGlmIChpKmk+bikgMCAKICAgIGVsc2UgaWYgKG4laT09MCkgZmMobi9pLGkpKzEgCiAgICBlbHNlIGZjKG4saSsxKQogIAogIHZhbCBzZXQ9KDQgdG8gMTk2KS5maWx0ZXIobiA9PiAoMiB0byBuLzIpLm1hcChrID0+IGZjKGsqKG4taykpKS5taW4+PTIpLnRvU2V0CiAgCiAgZGVmIGZwKG4gOkludCwgaTpJbnQgPSAyKTpMaXN0WyhJbnQsSW50KV0gPQogICAgaWYgKGkqaT5uKSBOaWwKICAgIGVsc2UgaWYgKG4laT09MCAmJiBzZXQuY29udGFpbnMoaStuL2kpKSAoaSxuL2kpIDo6IGZwKG4saSsxKQogICAgZWxzZSBmcChuLGkrMSkKICAKICB2YWwgbWFwPSg0IHRvIDk5Kjk5KS5tYXAoZnAoXykpLmZpbHRlcihfLmxlbmd0aD09MSkuZ3JvdXBCeShlbCA9PiBlbC5oZWFkLl8xK2VsLmhlYWQuXzIpCiAgCiAgcHJpbnRsbihtYXAuZmlsdGVyKF8uXzIubGVuZ3RoPT0xKS5oZWFkLl8yKDApKDApKQp9