М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
123478101934
123478101934
06.07.2021 13:21 •  Информатика

1,2: = 10 1/с; t0a = 0,07 с; ta =? tb = ? tc = ?
3 (рис. 5) = 10 1/с; 1= 2 = 3= 0,8 t= ? i = ?
4 (рис. 8)
1) 1 = 10 1/с; 2 = 11 1/с; 3 = 12 1/с; 1 = 35 1/с; 2 = 38 1/с 1= ? ; 2= ? ; t = ?
2) 1 = 10 1/с; 2 = 11 1/с; 3 = 12 1/с; 1 = 33 1/с; 2 = 38 1/с 1= ? ; 2= ? ; t = ?

👇
Открыть все ответы
Ответ:
Danya0011
Danya0011
06.07.2021

Цифровой гироскопический датчик предназначен для измерения угла и

направления вращения робота, а также скорости его вращения. Точность

измерения составляет +/-30 , максимальная скорость проведения измерений

4400/сек., частота опроса датчика 1кГц.

Будучи включенным, при длительном нахождении робота в неподвижном

состоянии, определяемое значение угла не остаётся постоянным, а ошибочно

меняется или дрейфует. Поэтому, чем больше времени проходит от начала

первого обращения к гироскопическому датчику до чтения показаний, тем

менее точным становятся результаты за счёт систематического накопления

ошибки. Поэтому перед началом каждого измерения всегда необходимо

производить обнуление угла при режима Сброс.

Сорян, это всё что я знаю о лего

4,7(9 оценок)
Ответ:
kurolesov71
kurolesov71
06.07.2021
{
Если что, часть программы не нужна для построения цепочки. Она просто иллюстрирует, что полученный результат верен.
}

var
 sq : array[0..999] of array[0..9] of boolean;
 co : array[0..999] of integer;
 ar : array[1..10003] of 0..9;
  i,j: integer;
 x: integer;
 t : boolean;
 begin
 for i := 0 to 999 do
   begin
   for j := 0 to 9 do
   sq[i][j] := false;
   co[i] := 0;
   end;
 for i := 1 to 3 do
   ar[i] := 0;
 i := 3;
 t := true;
 {write('000');}
 while t do
   begin
   i := i + 1;
   x := ar[i-3]*100 + ar[i-2]*10 + ar[i-1];
   if co[x] >= 10 then t := false
     else
     begin
     j := 1;
     while sq[x][j] do 
       j := (j + 1) mod 10;
     ar[i] := j;
     sq[x][j] := true;
     co[x] := co[x] + 1;
     {write(j)}
     end;
   end;
 {writeln;}
 writeln('Length: ',i - 1);

 {просто чтобы убедиться}
 for i := 0 to 999 do
   for j := 0 to 9 do
   sq[i][j] := false;

  t := true;
 j := 0;
 i := 1;
 while (i <= 10000) and t do
   begin
   x := ar[i] * 100 + ar[i+1] * 10 + ar[i+2];
   if sq[x][ar[i+3]] then t := false
     else
     begin
     sq[x][ar[i+3]] := true;
     j := j + 1;
     end;
   i := i + 1
   end;
 if t and (j = 10000) then
   write('Confirmed')
end.
4,6(89 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ