помогите решить задачи в делфи буду очень благодарен

[пыхонин филипп]

для массива из 20 элементов найти максимальный и минимальный элементы а также средне значение всех элементов массива.
Использовать процедуры и функции

Из заданной строки выбрать и напечатать все слова начинающиесЯ с буквы A

Описать логическую функцию
HodSLon(pole1,pole2 ), проверяющую может ли слон за один ход перейти с pole1 на pole2 шахматной доски! использовать типы:
vertical= (a b c d e f g h) и
pole= record
vert:vertical;
horiz: 1..8
end;

[Sm1Le]

Почитайте о Слове "Помогите" ....
Начните писать а там можно и помочь ....
Поищите в поиске и Тема напишите правильно тогда и найти будет легче ...

[maladoy]

ты бы в лабораторных работах посмотрел

[Serge_Bliznykov]

по задаче ход слона подскажу: шахматный слон ходит только по диагонали, это означает, что разница между конечным и начальным полем по горизонтали должна по абсолютной величине равна разнице по вертикали:

type
  vertical= (a, b, c, d, e, f, g, h );
  pole= record
   vert:vertical;
   horiz: 1..8
  end;

function HodSLon(pole1,pole2 : pole) : boolean;
begin
  HodSLon := false;
  {если поле1 и поле2 это одно и тоже поле - ответ отрицательный,
    слон не может пойти на то же поле, где он находится!}
  if (Pole1.horiz = Pole2.horiz) and (Pole1.vert = Pole2.vert) then Exit;
  
  if abs(Pole1.horiz - Pole2.horiz) =
        abs(ord(Pole1.vert) - ord(Pole2.vert)) then
      HodSLon := True;
end;

var
  P1, P2 : pole;
begin
  P1.horiz := 1;
  P1.vert := a;

  P2.horiz := 3;
  P2.vert := c;
  
  if HodSlon(P1,P2) then WriteLn('DA! Est` hod slona.')
  else WriteLn('Net hoda slona.');
  
end.

[paloit]

если 2 задачи первые актуальны - стучи
362827711