I= log_2(64) = 6 бит на символ (200 * 6 / 8) байт / 50 = 3 сек
Городничий_Коновалова384
24.10.2021
// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin var (n,m): =readinteger2('количество строк и столбцов в массиве: '); writeln('*** исходный массив ***'); var a: =matrrandom(n,m,-99,99); a.println(4); writeln(4*a.colcount*'-'); var avg: =a.elementsbyrow.average; writeln('среднее значение ',avg); var min: =(a.elementswithindexes.select(t-> (abs(t[0]-avg),t[1],t[2])) .minby(t-> t[0])); writeln('наименее отличающийся от среднего элемент a[', min[1]+1,',',min[2]+1,'] = ',a[min[1],min[2]]) end. пример количество строк и столбцов в массиве: 5 7 *** исходный массив *** -10 29 -69 98 40 -87 -64 74 -36 -62 -86 -3 -6 -48 -4 57 46 -23 -70 -5 25 -98 -2 23 9 -42 77 65 -57 -77 30 48 -52 -33 5 среднее значение -8.8 наименее отличающийся от среднего элемент a[1,1] = -10