Для узла с ip-адресом 167.57.252.220 адрес сети равен 167.48.0.0. чему равен второй по счету слева байт маски? ответ нужно записать в виде десятичного числа

Переведем  57 в двоичное: 57  /  2 = 28 (в остатке 1) 28  /  2 = 14  (в остатке 0) 14  /  2 =  7 (в остатке 0) 7  /  2 = 3 (в остатке 1) 3  /  2 = 1 (в остатке 1) 1  /  2 = 0 (в остатке 1) 57(10)  =  111001(2) переведем  48  в двоичное: 48  /  2 = 24 (в остатке 0) 24  /  2 = 12 (в остатке 0) 12  /  2 = 6 (в остатке 0) 6  /  2 = 3 (в остатке 0) 3  /  2 = 1 (в остатке 1) 1  /  2 = 0 (в остатке 1) 48(10)  =  110000(2) 111001 110000 первый  бит в обоих случаях равен 1, значит, первый  бит маски тоже равен 1. второй  бит  в обоих случаях равен 1, значит,  второй бит маски тоже равен 1. третий бит в ip-адресе равен 1, а в адресе сети равен 0, значит, третий бит маски равен 0. если  третий  бит  маски равен нулю, то все остальные биты маски  тоже равны  нулю. но при переводе десятичных чисел в двоичные мы получили 6-битовое двоичное число, а нам нужно 8-битовое. значит, слева добавляем два нуля. 00111001 00110000 свойство  маски  гласит, что в ней сначала до некоторого  разряда записаны только единицы, а затем только нули. значит, первый и второй бит в новом представлении маски равны 1. искомая  маска:   11110000(2). переведем  11110000  в десятичное число. (1*2^7)+(1*2^6)+(1*2^5)+(1*2^4)+(0*2^3)+(0*2^2)+(0*2^1)+(0*2^0)=128+64+32+16=240 ответ: 240(10)

var arr: array [1..10] of integer;

numofpositive, i: integer;

begin

    writeln('исходный массив: ');

    for i: =1 to 10 do

    begin

        arr[i]: =random(-100, 100);

        write(arr[i], ' ');

    end;

    writeln();

   

    for i: =1 to 10 do

        if arr[i] > 0 then

            numofpositive += 1;

    writeln('количество положительных элементов: ', numofpositive);

end.