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.
66 101 58 108 113 143 23 57 36 0 20 27 35 6 138max = 143 Нечетных: 7 Сумма элементов, не превышающих 100: 328 Число 20 в массиве встречается0 6 20 23 27 35 36 57 58 66 101 108 113 138 143
1) Сначала сигнал снимается каким-либо датчиком (фотоэлементы для света, микрофоны для звука и т.д.) и преобразуется в аналоговый сигнал. Этот сигнал подается на Аналого-цифровой преобразователь (АЦП), который производит оцифровку. Оцифрованный сигнал сохраняется в виде двоичного кода на цифровом носителе, в необходимом формате.
2) Уровни цвета измеряются с цветочувствительной матрицы (фотоматрицы) - набора из точечных датчиков цвета и освещения. Полученные уровни передаются на АЦП и кодируются в зависимости от его разрешающей глубина цвета) и количества точек на матрице (разрешение изображения).
3) Звук снимается с аналогового микрофона, полученный сигнал передается на АЦП и кодируется с определенной частотой и разрешением дискретизации.