1、高度与宽度(文件名：aa.pas)
输入杂乱排列的N 个正整数，求出所有的最大平台（即出现次数最多的数）的平台宽度
（最大平台数的个数）和平台高度（即最大平台中数的值）。例如：
输入：（aa.in）
10 （正整数的个数N，N ≤ 30）
1 2 3 1 2 3 1 2 1 2 （N个正整数，每两个间空一格）
输出：(aa.out)
1: its width is 4,its height is 1.
2: its width is 4,its height is 2.

var n,i,j,k,m,max:longint;
a,b:array[1..30] of longint;
begin
readln(n);
for i:=1 to n do begin
read(k);
inc(m);
a[m]:=k;
b[m]:=1;
if b[m]>max then max:=b[m];
for j:=1 to m-1 do if a[j]=a[m] then begin
dec(m);
inc(b[j]);
if b[j]>max then max:=b[j];
break;
end;
end;
for i:=1 to m do if b[i]=max then writeln(a[i],':its width is ',max,',its height is ',a[i]);
end.