Решите хоть что-нибудь. массивы. 1.дан массив, какое число встретится раньше максимальное или минимальное? 2.даны 2 массива одинакового размера. сформировать 3-й массив, каждый элемент которого равен минимальному из элементов с одинаковыми номерами. 3.заполнить массив из 11 элементов числами 1, 2,. заранее .

3)
program mas;
uses crt;
var
mass:array [1..11] of integer;
i:integer;
begin
for i:=1 to 11 do
begin
 mass[i]:=i;
 writeln('  ',mass[i]);
end;

end.

2)
program mas;
uses crt;
var
mass1,mass2,mass3:array [1..10] of integer;
i:integer;
begin
randomize;
for i:=1 to 10 do

begin
mass1[i]:=random(11);
mass2[i]:=random(11);
end;

for i:=1 to 10 do

begin
if mass1[i]<mass2[i] then
    mass3[i]:=mass1[i]
    else
    mass3[i]:=mass2[i];
end;

for i:=1 to 10 do write(' ',mass3[i]);

end.

1не хватает немного условий...я просто даже понять не могу что там.