>>80
よくあるプログラムミスかもな

業者をBi(i=0〜10)として
当選判定プログラム
if (a=0) Bi=当選

これだと最初のB0が100%当選
a=0は代入なので