[NickM]

Массив, после его сортировка, после сравнение двух соседних элементов, если они равны, то прерывание и выход с "OK", при достижении конца массива выход с "Тревога!".

UPD:
А Вам же только ДВОЙКИ считать? Тогда количество двоек в массиве и подсчитать.
Читая тему "PowerShell - Условие - любые два из всех" подумалось, что любые две переменные имели бы одинаковые значения.

[DJ Mogarych]

любые две переменные имели бы одинаковые значения »

Ну да. В данном случае двойки, но в целом может быть что угодно.

Я вообще про Zabbix спрашиваю, как там теперь реализовать.

[NickM]

Офф-топ кончено, но на Паскале это могло бы выглядеть, например, так:

Скрытый текст

Код:

const n=15;
var
v:array[1..n] of real;
k:integer;

procedure qSort(l,r:integer);
var i,j:integer;
    w,q:real;
begin
  i := l; j := r;
  q := v[(l+r) div 2];
  repeat
    while (v[i] < q) do inc(i);
    while (q < v[j]) do dec(j);
    if (i <= j) then
    begin
      w:=v[i]; v[i]:=v[j]; v[j]:=w;
      inc(i); dec(j);
    end;
  until (i > j);
  if (l < j) then qSort(l,j);
  if (i < r) then qSort(i,r);
end;

begin
randomize;
for k:=1 to n do begin               //Получаем массив значений
v[k]:=random(100);
writeln(round(v[k]));
end;
writeln('---');
qSort(1, n);                              //Сортируем массив
for k:=1 to n do begin
writeln(round(v[k]));
end;
writeln('---');
for k:=1 to n do 
if v[k]=v[k+1] then begin          //Сравниваем два соседних элемента, при совпадении выходим и сообщаем, что нашли
writeln(round(v[k]), ' , OK!');
break;
end;
if k=n then writeln('Nothing');   //Двух одинаковых не нашли - сообщаем об этом
end.

Осталось только на Powershell переложить

[DJ Mogarych]

сравнение двух соседних элементов, если они равны, то прерывание и выход с "OK" »

Двух соседних, совпадающих с двойкой, верно?

Да, видать, только поиск в массиве.

Код:

$1 = 2
$2 = 4
$3 = 4

if (($1,$2,$3 -eq 2).count -ne 2) {
"Тревога!"
}
else {
"ОК"
}

В Заббиксе тупо решил суммой...

Код:

sum(last(/Ramos Ultra/drycontactSensor[4]),last(/Ramos Ultra/drycontactSensor[6]),last(/Ramos Ultra/drycontactSensor[8]))<>8

[NickM]

Двух соседних, совпадающих с двойкой, верно? »

Любых, меньших/ первых (т.к. массив сортируется по возрастанию) совпадающих в массиве.
Выше приведённый пример на Паскале демонстрирует это.

[DJ Mogarych]

Ну любых не подойдёт же. Если массив, например, 4444444211111, то это не сработает.

[NickM]

Если массив, например, 4444444211111, то это не сработает. »

Т.е. типа такого?

Скрытый текст

Код:

const n=15;
const f=2;
var
v:array[1..n] of real;
k:integer;

procedure qSort(l,r:integer);
var i,j:integer;
    w,q:real;
begin
  i := l; j := r;
  q := v[(l+r) div 2];
  repeat
    while (v[i] < q) do inc(i);
    while (q < v[j]) do dec(j);
    if (i <= j) then
    begin
      w:=v[i]; v[i]:=v[j]; v[j]:=w;
      inc(i); dec(j);
    end;
  until (i > j);
  if (l < j) then qSort(l,j);
  if (i < r) then qSort(i,r);
end;

begin
randomize;
for k:=1 to n do begin               //Получаем массив значений
v[k]:=random(10)+1;
writeln(round(v[k]));
end;
writeln('---');
qSort(1, n);                              //Сортируем массив
for k:=1 to n do begin
writeln(round(v[k]));
end;
writeln('---');
for k:=1 to n do 
if (v[k]=f) and (v[k]=v[k+1]) then begin          //Сравниваем два соседних элемента, при совпадении выходим и сообщаем, что нашли
writeln(round(v[k]), ', Ok, found!');
break;
end;
if k=n then writeln('Nothing found.');   //Двух одинаковых не нашли - сообщаем об этом
end.

Некоторые результаты:

Скрытый текст

Код:

---
1
1
1
2
2
3
3
3
5
7
8
9
10
10
10
---
2, Ok, found!

Код:

---
1
3
3
4
5
5
6
8
8
8
8
9
9
10
10
---
Nothing found.

Код:

---
1
1
1
2
3
4
5
6
6
6
6
7
8
9
9
---
Nothing found.

[Sham]

Можно использовать делегата сортировки массива (List), но там сравнение может быть не по порядку, в зависимости от алгоритма сортировки.

Код:

$1 = 4
$2 = 4
$3 = 2

[Comparison[object]]$func = {
	param($i, $j)
	if ($i -eq $j) { return }
	$v1 = gv $i -ValueOnly; $v2 = gv $j -ValueOnly
	if ($v1 -ne 2 -and $v2 -ne 2) { 
		Write-Host "`$$i = $v1; `$$j = $v2";
		throw 'тревога' 
	}
}
$list = [Collections.Generic.List[object]](
	get-variable | where Name -match '\d+').Name
if ($list.Length) {
	try { $list.Sort($func); 'OK' }
	catch { $Error[1].FullyQualifiedErrorId }
}

[DJ Mogarych]

Я так понимаю, что эффективнее всего выцеплять из массива нужные значения и потом подсчитывать их количество. Или нет?