Дан массив из 20-ти элементов - случайных целых чисел в диапазоне от 40 до 60 Найти в этом
массиве количество чисел, которые равны 55 или 52 Заменить эти элементы на их количество.
Например, на входе массив 43 52 47 59 55 49 52 56
На выходе кол-во =3 и массив 43 3 47 59 3 49 3 56
Паскаль

Объяснение:

Робототехника опирается на такие дисциплины, как электроника, механика, кибернетика, телемеханика, мехатроника[4], информатика, а также радиотехника и электротехника. Выделяют строительную, промышленную, бытовую, медицинскую, авиационную и экстремальную (военную, космическую, подводную) робототехнику.

В жизни человечества начались появляться роботы и людей которые создавали их и изучали, их начали называть Робототехниками, даже для них их нашли науку Робототехника. Робототехника это наука которая изучает робов.

// PascalABC.NET 3.2, сборка 1457 от 29.05.2017

// Внимание! Если программа не работает, обновите версию!

begin

 Writeln('*** Исходный массив ***');

 var z:=MatrRandom(4,6,10,80);

 z.Println(4); Writeln(4*z.ColCount*'-');

 var t:=z.ElementsWithIndexes.MaxBy(x->x[2]);

 Writeln('Максимальный элемент z[',t[0]+1,',',t[1]+1,']=',t[2])

end.

Пример

*** Исходный массив ***

 47  18  64  34  29  42

 68  55  80  68  44  34

 15  51  43  75  32  52

 21  38  36  48  58  69

Максимальный элемент z[2,3]=80

Объяснение: