Имеются данные о температуре воздуха за 15 дней. Известно, что в течении этих 15 дней температура изменялась в диапазоне от -10°C до 5°С. 1. Описать массив, содержащий данные о температуре воздуха.
2. Чему равна размерность массива?
3. Какой тип элементов массива?
4. Чему равен i-й элемент массива? 5. Напишите программу, которая формирует массив, содержащий данные о температуре воздуха и выводит его на экран.
6. Найдите среднее значение температуры за 15 дней. Результат выведите на экран.
7. Подсчитайте количество дней, когда температура была выше 0°С. Результат Выведите на экран.
8. Подсчитайте количество дней, когда температура была ниже 0°С. Результат Выведите на экран.
9. Добавьте в программу команды, которые найдут день, когда температура была Минимальной, и саму температуру. Выведите найденные данные на экран. 10. Добавьте в программу команды, которые найдут день, когда температура была максимальной, и саму температуру. Выведите найденные данные на экран.

Не знаю пишут ли тут готовый код, но я писать его, но попробую схемой. 

Насчет диапазона я не понял точно, его тебе весь дали или в форме 1-10 или каждое число
крч я пишу общее решение а ты уже подумаешь как в твоей ситуации работать

1. берешь все делители числа 
что бы сделать это ты узнаешь число и делишь в цикле от 1 и дальше i++, понятное нужны только такие делители про котором остаток будет 0
т.е делаешь проверку на то что бы (% == 0)
если равно записываешь число(в массив или какт придумаешь), нет - идешь по циклу дальше
проверяешь пока i!=твоему числу (это и нормально цикл намутит и сразу исключит самое число в качестве делителя)

если цикл закончился суммируешь всё что достал и проверяешь равна ли эта сумма твоему числу, если да используешь cout а в нем начальное число если нет идешь ко второму и заново схема

для такой махинации нужен наверно будет еще 1 цикл поверх этого с проверкой на то что твое число не равно конечному в диапазоне/

Надеюсь тебе хотя бы немного.

1)

const
  n=40;
var
  a:array [1..n] of integer;
  i,k:integer;
begin
  Randomize;
  k:=0;
  Writeln('Исходный массив');
  for i:=1 to n do begin a[i]:=random(63)+20; Write(a[i],' ') end;
  Writeln; Writeln('Четные элементы, кратные 3');
  for i:=1 to n do
    if a[i] mod 6=0 then begin Inc(k); Write(a[i],' ') end;
  Writeln; Writeln('Отобрано элементов: ',k)
end.

Пример
Исходный массив
43 49 27 45 57 20 54 22 74 79 57 64 30 41 67 58 36 68 79 46 28 74 61 21 80 57 50 24 80 36 27 57 38 38 41 71 50 69 39 48
Четные элементы, кратные 3
54 30 36 24 36 48
Отобрано элементов: 6

2)

const
  n=20;
var
  a:array [1..n] of integer;
  i,imin:integer;
begin
  Randomize;
  Writeln('Исходный массив');
  imin:=1;
  for i:=1 to n do begin
    a[i]:=random(351)+20;
    Write(a[i],' ');
    if a[i]<a[imin] then imin:=i
    end;
  Writeln;
  Writeln('Минимальный элемент a[',imin,']=',a[imin])
end.

Пример
Исходный массив
292 54 248 310 181 210 263 284 255 156 177 340 173 39 108 144 270 40 318 155
Минимальный элемент a[14]=39