Дан массив А размером N Удалить минимальный элемент - PascalABC.NET

Формулировка задачи:

2. Дан массив А размером N.Удалить минимальный элемент.

Решение задачи: «Дан массив А размером N Удалить минимальный элемент»

Листинг программы

uses arrays;
 
begin
  var a := CreateRandomIntegerArray(ReadInteger('N = '), 0, 100);
  PrintLn(a);
  a := a.Where(x -> x <> a.Min()).ToArray();
  PrintLn(a);
end.

Объяснение кода листинга программы

Объявляется переменная a типа массив целых чисел
Создается случайный массив a размером N с помощью функции CreateRandomIntegerArray
Выводится на экран содержимое массива a с помощью функции PrintLn
Массив a обрабатывается методом Where, который исключает из него все элементы, равные минимальному значению массива
Полученный массив без минимального элемента сохраняется в переменную a с помощью метода ToArray
Выводится на экран обновленный массив a с помощью функции PrintLn