Принципы работы :
Работа датчика движения основана на анализе волн различных типов (акустических, оптических или радиоволн), поступающих на датчик из окружающей среды. В зависимости от типа используемого излучения датчики движения делятся на:
инфракрасные,
ультразвуковые,
фотоэлектрические, в которых применяется видимый свет,
микроволновые,
томографические, где используются радиоволны.
В зависимости от того, излучает ли сенсор сам эти волны и анализирует их после отражения или только получает волны извне, датчики делятся на:
активные;
пассивные;
комбинированные, в таких датчиках одна часть датчика посылает волны, а удалённая от неё вторая часть получает их.
Большинство существующих датчиков движения представляет собой некоторую комбинацию физических принципов работы, причём датчики одного типа волн, как правило, используют один механизм для их создания и обработки.
Наиболее распространенные датчики:
пассивные инфракрасные датчики (PIR), самые доступные и распространенные датчики движения в принципе[2], инфракрасные датчики составляют около 50 % применяемых по всему миру сенсоров движения[3];
активные ультразвуковые, микроволновые и томографические датчики;
комбинированные фотоэлектрические и инфракрасные датчики.
Каждый принцип имеет свои недостатки, иногда допуская ложные тревоги и несрабатывания в нужных случаях. Чтобы снизить вероятность ложного срабатывания, датчики иногда объединяют две технологии в одном устройстве (например, инфракрасная и ультразвуковая). Но это, в свою очередь, повышает уязвимость датчика, поскольку он становится менее надёжным и может в результате не сработать, даже когда должен.
var a,m,k,p:integer;
begin
read(a);
m:=a;
k:=1;
p:=1;
while a<>0 do
begin
if a>m then
begin
m:=a;
p:=k
end;
k:=k+1;
read (a)
end;
writeln (p)
end.