помогите составить программу в паскале
в пионерском лагере N отрядов с различным числом детей/. какой отряд самый малочисленный?

а пример какой нибуть есть?

program first;
var n,i,min:integer;
a:array [1..100] of integer;
begin
read(n);
for i:=1 to n do
read(a[i]);
for i:=1 to n do
if min>a[i] then min:=a[i];
write(min);
end.