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

Приведите по 3 примера циклического алгоритма из повседневной жизни

👇
Открыть все ответы
Ответ:
vladykasevera
vladykasevera
05.03.2023

1.Цифровые датчики , генерирующие последовательность импульсов или Двоичное слово ; - бинарные датчики , которые вырабатывают сигнал только двух уровней : " включено / выключено " 2.Гироскопический датчик выполнить гораздо более точные движения.Задача состоит в том , чтобы запрограммировать своего робота на выполнение поворота на месте на точный угол , используя Гироскопический датчик . 3.Гироскопический датчик предназначен для измерения угла вращения робота или скорости вращения . ... Поэтому важно правильно установить датчик на робота

4.Для точного измерения и движения самого корпуса...

Объяснение:

Рад был

4,4(72 оценок)
Ответ:
Малиш999
Малиш999
05.03.2023

Первая программа

const n=10;

var a,b:array[1..n] of integer;

   i,j:integer;

begin

 for i:=1 to n do readln(a[i]);

 for i:=1 to n do

   writeln('a[',i,']=',a[i]);

   

 for i:=n downto 1 do begin

   for j:=n-i+1 to n do begin

     b[j]:=a[i];

     break;

   end;

 end;

 

 for i:=1 to n do

   writeln('b[',i,']=',b[i]);

end.

Вторая программа

const n=10;

var i,s1,s2:integer;

   a:array[1..n] of integer;

begin

 for i:=1 to n do readln(a[i]);

 for i:=1 to n do begin

   if(a[i] mod 2 = 0) then

     s1:=s1 + a[i];

   if(a[i] mod 2 <> 0) then

     s2:=s2 + a[i];

 end;

 writeln('Разность равна: ',s1-s2);

end.

Третья программа

const n=10;

var i,s1,s2:integer;

   a:array[1..n] of integer;

begin

 for i:=1 to n do readln(a[i]);

 for i:=1 to n do begin

   if(i mod 2 = 0) then

     s1:=s1 + a[i];

   if(i mod 2 <> 0) then

     s2:=s2 + a[i];

 end;

 writeln('Разность равна: ',s1-s2);

end.

4,4(96 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ