题目

[二进制枚举法]有n个人(编号1、2、3……n)一起玩猜拳游戏，请输出n个人猜拳的所有的情况(每个人包括石头、剪刀和布三种情况)。 程序代码如下。 Dims(2) AsString, res AsString Dim i AsInteger, p AsInteger PrivateSub Command1_ Click()     s(0)="石头" : s(1)="剪刀" : s(2)="布"     n= Va1(Text1. Text)     For i=1 To n         res= res+Str(i)+"号"+”"     Next i     List1. AddItem res     For i=0 To    ①           p=1 : res =" "         For j=1 To n             res= res+" "+   ②               p=p\ 3         Next j         List1. AddItem res     Next i EndSub （1） 若5个人进行游戏，则总方案数为。 （2） 请完成程序中的填空。 ① ②  答案： 【1】32 【1】3^n-1【2】s(p Mod 3)

查看本题答案和解析