私は、乱数を表示し、その数字が何回ロールされるかを表示するチューリングアプリケーションに取り組んでいますが、ランダムがロールされる回数の最大値であるモードを見つけ、どの数字 (1- 6) が一番転がります。助けてくれてありがとう。
var numberDice : int
var freq : array 1 .. 6 of int
var highestNum : int
highestNum := 0
for j : 1 .. 6
freq (j) := 0
end for
for i : 1 .. 25
randint (numberDice, 1, 6)
freq (numberDice) := freq (numberDice) + 1
end for
for counter : 1 .. 6
if freq (counter) > highestNum then
highestNum := freq (counter)
end if
end for
put "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
put "Number Frequency"
put "1 ", freq (1)
put "2 ", freq (2)
put "3 ", freq (3)
put "4 ", freq (4)
put "5 ", freq (5)
put "6 ", freq (6)
put " "
put "Mode: ", highestNum
put "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"