
Ультразвуковые датчики широко используются в качестве датчиков приближения (proximity), для дистанционного обнаружении различных объектов, измерения расстояний. Как правило, датчики действуют путем посылки короткого цуга ультразвуковых волн в направлении объекта обнаружения, который, отразившись от поверхности объекта, возвращается обратно. Затем, электронная схема производит расчет времени между моментом посылки сигнала и моментом приема отраженного эха. Расстояние является производной величиной от времени и скорости звука в окружающей среде.
В настоящее время на рынке представлен широкий выбор ультразвуковых датчиков в различных конструктивных исполнениях, действующих в различных акустических частотах. Палитра поведения различных акустических частот в схожих условиях окружающей среды не является одинаковой. В большинстве случаев не составит труда, руководствуясь характеристиками, данными производителем, выбрать подходящий датчик для своей задачи. Но в случаях, когда в работе устройств появляются сбои или возникают существенные ошибки в измерениях, необходимо произвести более тщательную оценку факторов влияния, таких как:
var
s:string;
i,count:integer;
a: set of char;
begin
i:=3;
readln(s);
writeln('1)');
if length(s)>=3 then
repeat
write(s[i]);
i:=i+3;
until i>length(s)
else
writeln('error');
writeln;
writeln('2)');
i:=2;
repeat
write(s[i]);
i:=i+2;
until i>length(s);
writeln;
i:=1;
repeat
write(s[i]);
i:=i+2;
until i>length(s);
writeln;
writeln('3)');
a:=[];
count:=0;
for i := 1 to length(s) do
if s[i] in a then
else
begin
a:=a+[s[i]];
inc(count);
end;
writeln(count);
end.