Даны два одномерных массива разной размерности. для каждого из заданных одномерных массивов выполнить преобразование массива так: все его элементы, большие девяти заменить числом девять, все его элементы, меньшие пяти заменить числом пять, а все остальные элементы оставить без изменения. паскаль.с применением подпрограмм - процедур.

// pascalabc.net 3.0, сборка 1128 procedure convert(v: array of integer); begin   for var i: =0 to v.length-1 do       if v[i]> 9 then v[i]: =9       else           if v[i]< 5 then v[i]: =5 end; procedure develop(c: char; k: integer); begin   writelnformat('*** массив {0} ***',c);   var a: =arrrandom(k,-5,15);   write('исходный : '); a.println(',');   convert(a);   write('результат: '); a.println(','); end; begin   var m: =readinteger('количество элементов в массиве a: ');   var n: =readinteger('количество элементов в массиве b: ');   develop('a',m);   develop('b',n) end. тестовое решение: количество элементов в массиве a: 15 количество элементов в массиве b: 10 *** массив a *** исходный : 6,5,-5,9,1,0,-3,9,13,12,-4,8,11,14,-5 результат: 6,5,5,9,5,5,5,9,9,9,5,8,9,9,5 *** массив b *** исходный : 5,12,12,4,7,9,7,-3,-1,-2 результат: 5,9,9,5,7,9,7,5,5,5

Юра, миша, володя, саша, олег юра стоит раньше миши, но после олега:                                         первым будет олег, за ним юра, дальше миша. саша не находится рядом ни с олегом, ни с юрой, ни с володей:                                                                                     саша будет последний володя и олег не стоят рядом:                                 володя будет стоять между юрой и мишой                                  (между мишой и сашой не может из-за условия више)  ответ: олег, юра, володя, миша, саша