3-я 2-го варианта. язык паскаль. просто подскажите, как дописать элементы в массив.

есть такие массивы (но они есть только в pascal abc net), которые называются динамические. это такие массивы, длину которых ты назначаешь сам в теле программы. здесь тебе нужно использовать именно их, так как ты заранее не знаешь, сколько будет положительных компонентов.

пример объявления динамического массива:

var a: array of integer; //вот это до begin

setlength(a, b); //после begin, где b - количество элементов массива

далее работаешь как с обычным массивом.

Избыточность   — термин из  теории информации , означающий превышение  количества информации , используемой для передачи или хранения сообщения, над его  информационной энтропией . для уменьшения избыточности применяется  сжатие данных без потерь , в то же время  контрольная сумма   применяется для внесения дополнительной избыточности в поток, что позволяет производить исправление ошибок при передаче информации по каналам, вносящим искажения (спутниковая трансляция, беспроводная передача

А) 378 (dec) => (bin) делим число пополам и в двоичное представление пишем 0 для чётного и 1 для нечётного 378 - 0 - это младший разряд, правый 189  - 194 - 047 - 123 - 111 -15 - 12 - 01 - 1378 (dec) = 101111010    (bin) б) 101111010    (bin) => (oct) начиная справа, от двоичного представления отделяем по три разряда, каждые три двоичных цифры одну восьмеричную. 101111010 = 101 111 010 = 572 (oct) табличка замены  bin-oct 000-0 001-1 010-2 011-3 100-4 101-5 110-6 111-7 в)101111010    (bin) => (hex) в шестнадцатиричную из двоичной переводить тоже просто, отщепляя по 4 двоичных разяда 101111010 = 1 0111 1010 = 17а (hex) bin-hex 0000-0 0001-1 0010-2 0011-3 0100-4 0101-5 0110-6 0111-7 1000-8 1001-9 1010-a 1011-b 1100-c 1101-d 1110-e 1111-f