Одномерный массив (Delphi)

[proof512]

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



Задан массив a1, a2, …, an. Сформировать и вывести на печать
массив b1, b2, …bn-1, содержащий все элементы исходного массива А, кроме максимального.

[kventin_zhuk]

как-то так.

const int N = 10;
.......
int mass1[10];
int mass2[N - 1];
int max = mass1[0], count = 0;
for (int i = 0; i < N; i++)
    if (max > mass[i])
        max = mass1[i];
for (i = 0; i < N; i++)
    if  (max != mass1[i])
    {
         mass2[count] = mass[i];
         count ++;
     }

[proof512]

Спасибо тебе огромное