Бытовые роботы. Уже мало кого удивляют автоматизированные уборщики или пылесосы, но ожидается скачкообразное развитие этой тенденции. Вскоре в большинстве домов появятся роботы, запрограммированные на исполнение повседневных задач и всевозможных хозяйственных работ – в течение 5–10 лет ожидается прирост домашней сервисной роботизированной техники на 400 %. Эксперты полагают, что здесь машинам будет отдана работа, не влекущая за собой социально-опасных последствий (уборка, стирка), но в обозримом будущем люди не уступят приготовление пищи и уход за детьми.
Групповая робототехника. Достаточно проблематичная тенденция в качестве направления робототехники. Ученые работают над созданием робототехнических систем, состоящих из отдельных небольших машин, которые децентрализовано взаимодействуют друг с другом и окружающим миром – самоорганизующийся рой. Основное препятствие к реализации данной цели – создание аппаратного обеспечения, достаточно компактного и мощного для организации связи.
Медицинские роботы. Одна из наиболее мотивированных сфер, поскольку от её развития напрямую зависит человеческих жизней. Уже сегодня машины повсеместно используются при проведении хирургических операций и многих других процедур. Ежегодный прирост автоматизированных машин в медицине составляет 20 % и более.
Киборги. Здесь робототехника как перспективное направление играет особенную роль, поскольку является единственной возможностью полноценно заменять конечности и отдельные органы людям, нуждающимся в протезах того или иного рода. Спрос на продукцию этого рода очень велик, а возможности сферы стали более обширными после возникновения 3D-биопринтинга.
Искусственный интеллект. Появление интеллектуальных машин и программного обеспечения самостоятельно существовать и действовать в окружающей среде. И хотя действительно самостоятельного ИИ пока не существует, вероятность его возникновения в ближайшие 20 лет чрезвычайно высока.
// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandom(ReadInteger('n='), 1, 100); a.Println; // общее
Println('Максимальный четный ', a.Where(t -> t.IsEven).Max); // задача 1
Print('Второй минимальнывй нечетный'); // задача 2
a.Where(t -> t.IsOdd).OrderDescending.Skip(1).Take(1).Println // задача 2
end.
Пример
n= 15
67 8 60 1 96 40 73 25 39 93 64 89 40 69 9
Максимальный четный 96
Второй минимальнывй нечетный 89
