Необходимо составить программу с использованием рекурсии Замечание: под инвертированием понимают перестановку первого и последнего элементов этой части, второго и предпоследнего и т.д. Инвертировать часть массива, расположенн...
Необходимо составить программу с использованием рекурсии Замечание: под инвертированием понимают перестановку первого и последнего элементов этой части, второго и предпоследнего и т.д.
Инвертировать часть массива, расположенную между самым левым минимальным в первой половине массива и самым правым максимальным во второй половине массива.
Гость
Ответ(ы) на вопрос:
ГостьProgram Program1;
Var
a:array [1..10] of integer;
i,min,max, Nmin, Nmax:integer;
//Процедура рекурсивной инвресии массива
procedure InvertMas(nac,kon:integer);
var
temp:integer;
begin
temp:=a[nac];
a[nac]:=a[kon];
a[kon]:=temp;
if nac+1