ПРочитать книжку либо правила в учебнике.
Запомнить что читал
И научиться применять
ВОТ И ВСЁ
Ничего особенного для 8 класса.
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(15, 0, 150);
a.Println;
Println('max =', a.Max);
Println('Нечетных:', a.Where(t -> t.IsOdd).Count);
Println('Сумма элементов, не превышающих 100:',
a.Where(t -> t <= 100).Sum);
Writeln('Число 20 в массиве',a.Contains(20)?'':' не',' встречается');
a.Sort;
a.Println
end.
<h3>66 101 58 108 113 143 23 57 36 0 20 27 35 6 138</h3><h3>max = 143 </h3><h3>Нечетных: 7 </h3><h3>Сумма элементов, не превышающих 100: 328 </h3><h3>Число 20 в массиве встречается</h3><h3>0 6 20 23 27 35 36 57 58 66 101 108 113 138 143</h3>