Хелпаните с программой плз.Дан массив из 233 частей все элементы которого

PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

begin

// На случай если нужен вывод исходного массива

 ArrRandom(233,0,10000).Println.Where(t-gt;t.InRange(100,999)).Min.Println;

// Если не нужен начальный массив, но необходимы все трехзначные числа

 ArrRandom(233,0,10000).Where(t-gt;t.InRange(100,999)).Println.Min.Println;

// Если нужен только минимальный трехзначный элемент

 ArrRandom(233,0,10000).Where(t-gt;t.InRange(100,999)).Min.Println;

end.