Избыточность<span> — термин из </span>теории информации<span>, означающий превышение </span>количества информации<span>, используемой для передачи или хранения сообщения, над его </span>информационной энтропией<span>. Для уменьшения избыточности применяется </span>сжатие данных без потерь<span>, в то же время </span>контрольная сумма<span> применяется для внесения дополнительной избыточности в поток, что позволяет производить исправление ошибок при передаче информации по каналам, вносящим искажения (спутниковая трансляция, беспроводная передача
</span>
Составим таблицу, в которой посчитаем число путей, ведущих в данную ячейку и не содержащих ни одной жилы.
Число путей равно сумме числа путей, ведущих в соседнюю ячейку сверху, и числа путей, ведущих в соседнюю ячейку слева, так как только из них можно попасть в текущую ячейку. В ячейки с золотом поставим нули.
Проделав вычисления, получаем ответ 106.
Если нужна матрица другого размера, то надо исправить значения n=5; m=6 на нужные.
const
n=5;
m=6;
var
a:array[1..n,1..m] of integer;
i,j,min,max:integer;
begin
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=random(20);
write(a[i,j]:4);
if j=1 then
begin
min:=a[i,1];
max:=a[i,1];
end
else
begin
if a[i,j]<min then min:=a[i,j];
if a[i,j]>max then max:=a[i,j];
end;
end;
writeln('; min=',min,'; max=',max);
end;
end.