// PascalABC.Net 3.0, версия 1066 const mm=50; nn=50; var n,m,i,j,k1,k2,p:integer; s1,s2,s3:longint; a:array[1..mm,1..nn] of integer; begin Write('Число строк и столбцов массива: '); Read(m,n); Write('Значение p: '); Read(p); Writeln('*** Сгенерированный массив ***'); Randomize; s1:=0; s2:=0; s3:=0; k1:=0; k2:=0; for i:=1 to m do begin for j:=1 to n do begin a[i,j]:=Random(101)-50; Write(a[i,j]:4); if a[i,j]>30 then s1:=s1+a[i,j]; if Odd(a[i,j]) then Inc(k1) else begin s2:=s2+a[i,j]; Inc(k2) end; if i+j=p then s3:=s3+a[i,j] end; Writeln end; Writeln('Сумма элементов массива, больших 30: ',s1); Writeln('Количество нечетных элементов массива: ',k1); Writeln('Среднее арифметическое четных элементов массива: ',s2/k2); Writeln('Сумма элементов массива c суммой индексов ',p,': ',s3) end.
PROGRAM MatrixMax var a : array [1..3, 1..4] of integer b : array [1..3] of integer Max, i, j : integer BEGIN crt; for i:=1 to 3 do begin for j:=1 to 4 do begin read (a[i, j]); // вводим элементы в массив a[1..3, 1..4] end; writeln; // делаем пустой перевод строки end; for i:=1 to 3 do begin b[i] := a[i, 1]; for j:=1 to 4 do begin if a[i, j] > b[i] then b[i] := a[i, j]; // находим максимальный элемент в каждой строке и записываем в b[1..3] end; end; Max := b[1]; for i:=1 to 3 do if b[i] > Max then Max := b[i]; // Находим максимальный элемент из максимальных элементов writeln (Max); // Выводим его на экран END.
M=33257(10)
L = 97A(16) = 9 * 16^2 + 7 * 16^1 + A * 16^0 = 9 * 256 + 7 * 16 + 10 * 1 = 2304 + 112 + 10 = 2426(10)
T = 76705(8) = 7 * 8^4 + 6 * 8^3 + 7 * 8^2 + 0 * 8^1 + 5 * 8^0 = 7 * 4096 + 6 * 512 + 7 * 64 + 5 * 1 = 28672 + 3072 + 448 + 5 = 32197(10)
p = FB01(16) = F * 16^3 + B * 16^2 + 0 * 16^1 + 1 * 16^0 = 15 * 4096 + 11 * 256 + 1 = 61440 + 2816 + 1 = 64257(10)
K = 1 0000 0000 0011 0101(2) = 1 * 2^16 + 0 * 2^15 + ... + 0 * 2^6 + 1 * 2^5 + 1 * 2^4 + 0 * 2^3 + 1 * 2^2 + 0 * 2^1 + 1 * 2^0 = 65536 + 32 + 16 + 4 + 1 = 65589(10)
Теперь подставим числа в формулу и получим результат:
M + 9L - K - 2T + p = 33257 + 9 * 2426 - 65589 - 2 * 32197 + 64257 = 33257 + 21834 - 65589 - 64394 + 64257 = -10635
ответ: -10635
P.S. У вас T тоже самое, что p. Так и должно быть?