package Ġde . h ud de ld ad del . euler Ċ Ċ import Ġorg . junit . jupiter . api . Assertions Ċ import Ġorg . junit . jupiter . api . Test Ċ Ċ class ĠProblem 3 8 7 Test Ġ{ ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġis Har sh ad () Ġ{ ĊĠĠĠĠĠĠĠ ĠAssertions . assertEquals ( true , Ġ 2 0 . to BigInteger (). is Har sh ad ()) ĊĠĠĠĠĠĠĠ ĠAssertions . assertEquals ( true , Ġ 2 0 1 . to BigInteger (). is Har sh ad ()) ĊĠĠĠĠĠĠĠ ĠAssertions . assertEquals ( false , Ġ 2 0 2 . to BigInteger (). is Har sh ad ()) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġis Strong () Ġ{ ĊĠĠĠĠĠĠĠ ĠAssertions . assertEquals ( true , Ġ 2 0 1 . to BigInteger (). is Strong ()) ĊĠĠĠĠĠĠĠ ĠAssertions . assertEquals ( false , Ġ 2 0 2 . to BigInteger (). is Strong ()) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġcompute () Ġ{ ĊĠĠĠĠĠĠĠ ĠAssertions . assertEquals ( 9 0 _ 6 1 9 . to BigInteger (), ĠProblem 3 8 7 ( 1 0 _ 0 0 0 . to BigInteger ()). compute ()) ĊĠĠĠ Ġ} Ċ Ċ } Ċ