Построить алгоритм и решить задачу.
На складе две бочки с горючим по 120 литров в каждой. Есть автомобиль в бак которой вмещается 30 литров горючего. На 100 км пути машина расходует 10 литров топлива. Как далеко можно уехать от места старта если в кузов автомобиля умещается только одна бочка?
Задача без подвоха.
Решить МАТЕМАТИЧЕСКОЙ МОДЕЛЬЮ

Const
  m = 4; n = 3;

var
  a: array[1..m, 1..n] of integer;
  i, j, mi, mj, max: integer;

begin
  Randomize;
  for i := 1 to m do
    for j := 1 to n do
      a[i, j] := random(100) - 50;  // случайные числа в интервале [-50..50]
  max := -100;  //меньше минимального из возможных
  for i := 1 to m do
    for j := 1 to n do
      if max < abs(a[i, j]) then begin
        max := abs(a[i, j]); mi := i; mj := j
      end;
  writeln('Исходный массив');
  for i := 1 to m do
  begin
    for j := 1 to n do
      write(a[i, j]:4);
    writeln
  end;
  writeln('Максимальный по модулю элемент:a(', mi, ',', mj, ')=', max:3)
end.

Контрольный пример:
Исходный массив
  10  30  30
  24 -11  28
 -43 -50 -13
  -8  21   5
Максимальный по модулю элемент:a(3,2)= 50

Могу подсказать идеи: в 1м используешь метод сортировки пузырьком, только не больше или меньше, а отрицательное или положительное
во 2ом слишком просто, if(a[i]>b[i]) c[i]=a[i]; else c[i]=b[i];
в 3ем тоже дотсточно просто, пройтись циклом по массиву, и если число меньше нужного, а следующее больше, то пузырьком смещаешь все элементы выше i+1 вверх, а на i+1 вставляешь нужное число
в 4ом пройти весь массив проверяя лучше через функцию каждое число на правильность
в 5ом делаешь отдельный массив, в котором все сдавшие, и методом сложения всех чисел и деления на их количество находишь среднее.
программы пиши сам, не честно на олимпиадах так нагло воровать, дальше всё равно не пройдёшь, в 8м классе на олимпиаде по информатике из 60 человек хоть что-то решили только 4, и то по 1ой задаче