В массиве b (n) заменить каждый элемент массива максимальным…

Const n=5; //размер массиваvar a: array[1… n] of integer; i,xmax: intger; beginfor i: =1 to n do begina[i]: =random (10); //заполняем массив случайными числами от 1 до 10write (a[i]); // выводим массивend; xmax: =a[1]; for i: =1 to n do beginif a[i]>xmax then xmax: =a[i]end; for i: =1 to n doa[i]: =xmax; writeln ('Конечный массив: '); for i: =1 to n dowrite (a[i]); end.