なすがに式じゃんけん100番勝負実施要項(案)
エクセルオリンピック夏問題5番

(1)なすがに式じゃんけんとは?

  チョキで勝てば2点です。
  グーで勝てば5点です。
  パーで勝てば10点です。
  10000回戦で総合点数の多い方が勝ちです。

  ただし、あいこも1回の勝負として数えます。
(2)応募者でリーグ戦(応募者数によってはトーナメント)勝ち数(勝ち点2,引き分け1)を競います。

(3)応募形式 エクセルVBAでFunction Jankenを作る。下の仕様にしたがって下さい。
  a 関数名: Janken
  b 第1引数Kaisuu: 1から10000の整数値。対戦の回数を示します。
  c 第2引数AitenoTe: 0、1,2のいずれか。 0はグー、1はチョキ、2はパー。
  d 返値: 応募者の出す手。0、1,2のいずれか。 0はグー、1はチョキ、2はパー。
  e 変数Name: 応募者の名前を入れて下さい。

 補足
  a Jankenからサブプロシージャを呼び出す場合は、Private Sub プロシージャにして下さい。
  b ループを使用する場合はDoEventsを忘れずに入れて下さい。
  c こちらで作った審判用の関数Mainの呼び出しは禁止です。
  d 無限ループになったりすると失格です。

(4)〆切 6月末日(5月10日以降であればいつでも良いです。)

(5)応募先: kuma_pooh@hotmail.com  にメールで。

(6) その他:掲示板まで

(7)サンプルファイルはサンプルファイル置き場にあります。
 Mainを実行すると勝負が行われ、勝敗が表示されます。

(8) 応募していただいた解答は原則として、専用掲示板等で公開致しますのでご了承下さい。
その際はもちろんハンドルネームを使用いたします。
補足: 
    タイトルがなすがに式じゃんけん100番勝負なのにほんとうは10000番勝負の理由。100番じゃ相手のパターンをよんで、それに応じた手をだすのには回数が少ないかなと思ったから

戻る