Question

用pascal语言编一个程序

:一架天平共有两端,如果两端的硬币重量相等时,则可以保持平衡.由此可以把80枚
分为量相等的两份最后可以找出次品.然而要保持天平所称的次数尽可能少,则可以把80枚
分成不完全相等的三组:甲:27枚,乙:27枚,丙26枚.先把甲组与乙组分别放在天平的两端.当天平
仍保持平衡时,则显然次品在丙组中.当天平不保持平衡时,指针指向哪边(哪边重)次品就在哪
边.假设次品在甲、乙中任意一组，则将27枚分成相等的三组3枚、3枚、3枚次品必定在这
三组中的任意一组中，先则任意两组放在天平上，确定次品在哪一组，最后再将3枚分成1
枚，1枚，1枚，选择任意两组防在天平上称，确定次品是在哪一组。这样共称了四次找出了
次品。
当次品在丙组时，将丙组26枚反为：A：9枚 B：9枚 C：8枚 把A、B防在天平上确
定次品的位置假设在A、B中的任意一组。则再将9枚分成3枚 3枚 3枚 选择任意两组，确
定次品的位置。在将次品所在的3枚分为1枚 1枚 1枚最后任意选择两组称。确定次品是哪
个 此时共称了4次找出次品。
当次品在丙组中的C组时，将8枚分为3枚 3枚 2枚，再将前两组放在天平上称，确定
次品的位置。假设在3枚中的任意一组，则将3枚分为：1枚 1枚 1枚确定次品是哪
个 此时共称了4次找出次品。
当次品在丙、C 2 枚时，把2枚分为1枚 1枚 防在天平上称，指针偏向哪边，次品就是
哪个。此时共称了4次找出次品。
综上所述最少称4次找出次品。

Answer 1

某一年初赛的问题求解.....

Answer 2

初赛的问题求解.....