Решить ! прям подробно как надо! ​

Юра, миша, володя, саша, олег юра стоит раньше миши, но после олега:                                         первым будет олег, за ним юра, дальше миша. саша не находится рядом ни с олегом, ни с юрой, ни с володей:                                                                                     саша будет последний володя и олег не стоят рядом:                                 володя будет стоять между юрой и мишой                                  (между мишой и сашой не может из-за условия више)  ответ: олег, юра, володя, миша, саша

1. const n=11; var a: array[1..n] of integer; max,imax,i: integer; begin randomize; for i: =1 to n do begin   a[i]: =random(101);   write(a[i],' ');   end; writeln; max: =a[1]; imax: =1; for i: =2 to n do   if a[i]> max then begin max: =a[i]; imax: =i; end; writeln('max = ',max,'   imax = ',imax); end. пример: 67 3 11 65 72 82 18 42 8 74 40  max = 82   imax = 6 2. const n=11; var a: array[1..n] of integer; min,i: integer; begin randomize; for i: =1 to n do begin   a[i]: =random(51)+20;   write(a[i]: 3);   end; writeln; min: =a[1]; for i: =2 to n do   if a[i]< min then min: =a[i]; writeln('min = ',min); for i: =1 to n do   write(a[i]-min: 3); writeln; end. пример:   63 25 39 25 44 21 65 55 66 47 42 min = 21   42   4 18   4 23   0 44 34 45 26 21 3. const n=15; var a: array[1..n] of integer; s,i: integer; begin randomize; for i: =1 to n do begin   a[i]: =random(11)+2;   write(a[i]: 3);   end; writeln; s: =0; for i: =1 to n do   if a[i] mod 2 = 0 then s: =s+a[i]; writeln('s = ',s); end. пример:   2   3   5   9   3 12   5 10   3   2   3 10   8   8   3 s = 52 4. const n=10; var a: array[1..n] of integer; max,i: integer; begin randomize; for i: =1 to n do begin   a[i]: =random(51)-25;   write(a[i]: 4);   end; writeln; max: =-10000; for i: =1 to n do   if (a[i]< 0)and(a[i]> max) then max: =a[i]; writeln('max = ',max); end. пример:     1   1 -22   21 -25   17 -11 -13   9   16 max = -11