●問題3
ボタン（Button1）を押したら、サイコロを600回振り、それぞれの目が出た回数を数えて表示（Label1に表示）しなさい。
なお変数は、1次元配列（Ary）、発生した乱数（n）、ループのカウンタ（i）とする。
【必須条件】要素数が6の1次元配列（Ary）を宣言し、RandomizeとRandom関数を使って乱数を発生させ、1〜6の目が出た回数を記録。

procedure TForm1.Button1Click(Sender: TObject);
var
n:Integer;
i:Integer;
Ary:array [1.. □] of Integer;
begin
Randomize;

//Aryの初期化
for i:= □ To □ do
Ary[□]:=0;
//出た目を数える
for i:= □ to □□□ do
begin
//Randomは、0<=X<Rangeの範囲にある乱数を返す
n:=Random (□)+ □;
//Label2.Caption:=Label2.Caption+IntToStr(n)+#13;
Ary[□]:=Ary[□] + 1;
end;

//結果の表示
for i:=1 To □ do
Label1.Caption:=Label1.Caption+IntToStr(Ary[□])+#13
end;