В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
sashaloveove
sashaloveove
07.12.2020 09:08 •  Информатика

6. Закодируйте слово «Звук» с азбуки Морзе​

Показать ответ
Ответ:
toyru556
toyru556
15.06.2021 20:10

Робототехника (робот пен технологиядан; ағылшын робототехникасы - робототехника [1], робототехника [2]) - бұл автоматтандырылған техникалық жүйелерді жасаумен айналысатын қолданбалы ғылым және өндірісті дамытудың маңызды техникалық негізі болып табылады [3].

Робототехника электроника, механика, кибернетика, телемеханика, мехатроника [4], информатика, сонымен қатар радио және электротехника сияқты пәндерге негізделген. Құрылыс, өндірістік, тұрмыстық, медициналық, авиациялық және экстремалды (әскери, ғарыштық, су асты) робототехника бар.

Терминнің этимологиясы

«Робототехника» сөзін (немесе «робототехника», «робототехника») алғаш рет Исаак Асимов 1941 жылы басылған «Өтірікші» ғылыми-фантастикалық әңгімесінде баспа түрінде қолданған.

«Робототехника» сөзі 1920 жылы чех жазушысы Карел Чапек пен оның інісі Йозеф Карел Чапектің «Р. W. R. « («Rossumskie әмбебап роботтар»), алғаш рет 1921 жылы сахналанып, көрермендермен бірге сәттілікке ие болды. Онда зауыт иесі көптеген андроидтарды шығаруды ұйымдастырады, олар басында демалмай жұмыс істейді, бірақ кейін көтеріліп, олардың жасаушыларын жояды [5].

Объяснение:

0,0(0 оценок)
Ответ:
DaniilEzhov036
DaniilEzhov036
26.05.2020 04:14

Задача 1:

program HW1;

var a,b,c:integer;

begin

   write('Ведите три целых числа через пробел: '); readln(a,b,c);

   write('Числа, попадающие в отрезок [1,3]: ');

   if (a >= 1) and (a <= 3) then write(a, ' ');

   if (b >= 1) and (b <= 3) then write(b, ' ');

   if (c >= 1) and (c <= 3) then write(c, ' ');

end.

Задача 2:

program HW2;

var a,b:real;

var c:integer;

begin

   write('Ведите две стороны прямоугольника через пробел: '); readln(a,b);

   writeln('Что трубуется вычислить?');

   writeln('1) Площадь прямоугольника');

   writeln('2) Периметр прямоугольника');

   writeln('3) Диагональ прямоугольника');

   readln(c);

   if c = 1 then writeln('Площадь прямоугольника равна ', a*b:1:1)

   else if c = 2 then writeln('Периметр прямоугольника равна ', 2*(a+b):1:1)

   else if c = 3 then writeln('Диагональ прямоугольника равна ', sqrt(sqr(a)+sqr(b)):1:1)

   else writeln('Введёно некорректное значение.')

end.

Задача 3:

program HW3;

var a,i:integer;

begin

   a := 0;

   for i := 1 to 99 do

       begin

           if (i mod 2 ) <> 0 then a := a + i

       end;

   writeln('Cуммa ряда 1, 3, 5..99: ', a);

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота