решить оба задания только можно подробно сделать если получится !

ответ: < P.S. Все двоечки, которые я написал вверху чисел пишутся внизу под цифрами. Нет возможности писать нижним текстом. >

16.

а) 101010² + 1101² = 110111²

б) 1010² + 1010² = 10100²

в) 10101² + 111² = 11100²

17.

а) 1010² × 11² = 11110²

б) 111² × 101² = 100011²

в) 1010² × 111² = 1000110²

может быть крик?

решение должно иметь од 20 до 5000

var i, j, min, min_i, min_j: integer; a: array[1..5, 1..5] of integer;

begin for i : = 1 to 5 do begin for j : = 1 to 5 do begin a[i, j] : = random(100) + 1; write(a[i, j]: 4); end; writeln; end; min : = 999; for i : = 1 to 5 do for j : = 1 to 5 do if min > a[i, j] then begin min : = a[i, j]; min_i : = i; min_j : = j; end; a[min_i, min_j] : = 0; writeln('массив с замененным минимальным элементом'); for i : = 1 to 5 do begin for j : = 1 to 5 do write(a[i, j]: 4); writeln; end; end.