Вычитание в 2-10 системе
0101001 - 0001010101100010

вычислить и подскажите где нужно сделать коррекция по

Question

Информатика: Вычитание в 2-10 системе 0101001 - 0001010101100010 вычислить и подскажите где нужно сделать коррекция по

MrAmoral · Accepted Answer

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходный массив A ***');
var a:=MatrRandom(10,10,0,20);
a.Println(3); Writeln(3*a.ColCount*'-');
var b:=a.Rows.Select(row->row.Sum).ToArray;
Writeln('*** Массив B ***'); b.Println
end.

Пример
*** Исходный массив A ***
9 15 8 17 18 10 17 15 19 18
18 0 10 5 20 2 16 3 20 17
1 11 3 8 4 19 14 10 15 13
4 2 14 11 4 13 10 2 5 3
8 5 16 19 1 9 14 16 18 10
2 14 13 19 19 18 11 20 12 20
16 7 0 6 13 16 7 20 1 7
12 14 18 16 9 16 16 5 7 16
4 19 12 5 10 11 9 16 12 6
1 10 10 6 7 0 5 10 5 5

*** Массив B ***
146 111 98 68 116 148 93 129 104 59

Вычитание в 2-10 системе 0101001 - 0001010101100010 вычислить и подскажите где нужно сделать коррекция по

MOGZ ответил

Вычитание в 2-10 системе
0101001 - 0001010101100010

вычислить и подскажите где нужно сделать коррекция по