Животные генерируют и воспринимают ультразвук при специальных рецепторных аппаратов. Ультразвук им ориентироваться в пространстве. Ультразвуковые колебания, создаваемые животными, отражаются от предметов и воспринимаются специализированными органами слуха как преграды на пути.
в первую очередь относятся дельфины, морские свинки,летучие мыши, тропические рыбы и др.
Ультразвуковой датчик определяет расстояние до объекта, измеряя время отображения звуковой волны от объекта. Частота звуковой волны находится в пределах частоты ультразвука, что обеспечивает концентрированное направление звуковой волны, так как звук с высокой частотой рассеивается в окружающей среде меньше
Цифровой гироскопический датчик предназначен для измерения ...и ...вращения робота. Поэтому перед началом каждого измерения всегда необходимо производить обнуление угла при режима
Ультразвуковой датчик широко применяется в самых разных сферах производства, и в некотором роде являются универсальным средством решения многих задач автоматизации технологических процессов. Такие датчики применяются для определения удаленности и местонахождения различных объектов.
Объяснение:
program z1;
var a:array [1..10] of integer;
i,sp,so:integer;
begin
randomize;
sp:=0;
so:=0;
write('Массив: ');
for i:=1 to 10 do
begin
a[i]:=random(41)-20;
if a[i] > 0 then sp:=sp+a[i]
else so:=so+a[i];
write(a[i],' ')
end;
writeln;
writeln('Сумма положительных элементов: ',sp);
writeln('Сумма отрицательных элементов: ',so)
end.
Объяснение:
Задаём элементы массива через random
Если элемент больше 0, то считаем сумму положительных элементов, в противном случае считаем сумму отрицательных элементов (0 на сумму не влияют)
Выводим значение элемента на экран
Выводим суммы
Если 0 очень важны, то меняем строки:
if a[i] > 0 then sp:=sp+a[i]
else so:=so+a[i];
на:
if a[i] > 0 then sp:=sp+a[i];
if a[i] < 0 then so:=so+a[i];
2.b
3.c
4.c
5.e
6.b
7.c
8.c
9.c
10.с
11.a
12. Read(A,B); A:=A*2; B:+B+10;
13. var a: Array[1..5,1..5] of real;
14.a
15. c
16. d
17.a
18 нет блок схемы
19. 1-e 2-d 3-c 4-b 5-a
20. var a,b,S,P: real;
begin
write('Ввод сторон прямоугольника');
Read (a,b);
P:=(a+b)*2;
S:=a*b;
Write('Периметр:', P);
Write('Площадь:', S);
End.
Блок схему по программе легко нарисовать.