Const
N = 5;
M = 10;
Var
A : array[1..N,1..M] of Integer;
i,j : Byte;
Begin
For i:=1 to N do
Begin
For j:=1 to M do
Begin
If i>j then A[i,j]:=i else A[i,j]:=i*j;
Write(a[i,j]:6);
end;
Writeln;
end;
end.
К- 11+12 = 23
С- 11+19 = 30
Б- 11+2 = 13
23 = 10111
30 = 11110
13 = 1101
Сумма: 10111+11110+1101 = 10000010 = 66
23 = 27 (восьмеричная)
30 = 36
13 = 15
Сумма: 15+27+36 = 102 = 66
23 = 17(шестн.)
30 = 1E
13 = D
Сумма: 17+1E+D = 42 = 66
Билл из Гравити Фолз пожирает оленя
Если тебе вводить вручную,то в первом цикле сделай read(a[i,j]);
N = 2^i
i = 5
N = 2^5 = 32
Ответ: N равно 32