Заданы массивы А и В из N чисел (N=10) случайным образом. Сформировать новый массив, каждый элемент которого равен минимальному из соответствующих элементов этих массивов

var a: array[1 ... 10] of integer;

b: array[1 ... 10] of integer;

mina, minb, i: integer;

min: array[1 ... 2] of integer;

begin

randomize;

mina:=1;

minb:=mina;

for i:=1 to 10 do a[i]:=random (100);

for i:=1 to 10 do b[i]:=random (100);

for i : = 2 to n do if a [ i ]
for i:=2 to n do if b[i] < b[min] then minb:=b[i];

min[1]:=mina;

min[2]:=minb;

end.