Дано 2 одномерных массива размером 20 ячеек первый массив заполнить случайными…

uses crt; var a: array[1… 20] of integer; b: array[1… 20] of integer; i,j,k,min,max: integer; beginwriteln ('Первый массив: '); for i: =1 to 20 do begin a[i]: =random (50-10+1)+10; write (a[i]: 3); end; writeln; writeln ('Второй массив: '); for j: =1 to 20 do begin b[j]: =random (90-30+1)+30; write (b[j]: 3); end; writeln; min: =60; writeln ('Первый массив в порядке возрастания: '); for i: =1 to 20 do begin for j: =1 to 20 do begin if a[j]max then begin max: =b[i]; k: =i; end; end; write (max: 3); b[k]: =0; max: =0; end; writeln; end. Насчет среднего арифметического мне не понятно: среднее арифметическое каких повторяющихся чисел брать? В каждом массиве, или в двух массивах одновременно? И учитывать ли то, что числа в массиве могут повторяться. Именно поэтому я не включил этого в код.