14. в данной целочисленной квадратной матрице а(5, 5) указать индексы всех элементов, имеющих наибольшее значение. в pascalabc.

Несмотря на длинное условие, эта совсем не сложная. очевидно, что здесь речь идет о  двух системах счисления, причем основание одной из систем в два раза больше, чем основание   другой. по записи выражений (163*11): 5+391 и (454*15-26): 5+2633 можно предположить, что в  первом случае основание меньше, а во втором - больше. пусть x - основание меньшей системы  счисления, тогда второе основание будет 2x. переведем данные выражения в десятичную систему  счисления по известному правилу: 1) ((1*(2x)^2+6*(2x)+3)*(1*2x+1)): 5+(3*(2x)^2+9*2x+1)= ((4*x^2+12*x+3)*(2*x+1)): 5+(12*x^2+18*x+1) 2) ((4*x^2+5*x+4)*(1*x+*x+6)): 5+(2*x^3+6*x^2+3*x+3)= ((4*x^2+5*x+4)*(x+*x+6)): 5+(2*x^3+6*x^2+3*x+3) после раскрытия скобок и подобных, с учетом того, что числа в выражениях должны быть  равны, получим: 8*x^3+88*x^2+108*x+8 = 14*x^3+55*x^2+42*x+29 т.е. 6*x^3-33*x^2-66*x+21=0 очевидно, что нас интересуют только целочисленные положительные решения. ещё раз посмотрим на выражение (454*15-26): 5+2633 из него видно, что основание системы счисления должно быть не меньше 7. подставим 7 в уравнение, и! сразу обнаруживаем, что это и есть подходящее нам решение. таким образом, в "десятке" одного было 7 человек, а в "десятке" другого - 14. общее количество "шпиёнов" у каждого = 7820

Const n=6; m=4; var  a: array[1..n,1..m] of integer; i,j,c: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do   begin   for j: =1 to m do   begin   a[i,j]: =random(50);   write(a[i,j]: 4);   end;   writeln;   end; for j: =1 to m do   begin   c: =a[3,j]; a[3,j]: =a[5,j]; a[5,j]: =c;   end; writeln('полученный массив: '); for i: =1 to n do   begin   for j: =1 to m do write(a[i,j]: 4);   writeln;   end; end. пример: исходный массив:   25   4   33   17   19   23   42   9   36   40   1   48   21   44   13   18   38   29   8   7   24   13   5   13 полученный массив:   25   4   33   17   19   23   42   9   38   29   8   7   21   44   13   18   36   40   1   48   24   13   5   13