Заполнить массив как указано на рисунке, паскаль​

var

 a: array [1..10,1..10] of Integer;

 i, j: Integer;

begin

 for i := 1 to 10 do

   for j := 1 to 10 do begin

     if j >= i then

       a [i, j] := j - i + 1

     else

       a [i, j] := 0;

   end;

 for i := 1 to 10 do begin

   WriteLn;

   for j := 1 to 10 do

     Write (a [i, j] :3);

 end;

 ReadLn;

end.

А) У нас есть число в двоичной системе счисления: 01001100. Над каждой цифрой напишем ее разряд (справа налево; разряд начинается с 0). Затем мы первую цифру данного нам числа должны перемножить на основание данного нам числа ( т.к 01001100 - двоичное число, то основание соответственно равно 2) в какой-то степени ( степень определяется разрядом цифры), затем нужно проделать это со всеми цифрами числа и сложить результаты(все это делается с право налево).
01001100(2) = 1*2^6 + 1*2^3 + 1*2^2 = 76(10) ( 0 можно опускать, так как при умножении на 0 всегда будет 0)
б) 00010101(2) = 1*2^4 + 1*2^2 + 1*2^0 = 21(10)
P.s Так как код прямой, то все разряды являются целом числом в двоичном коде. Самый крайний левый разряд определяет знак числа в десятичной системе счисления ( если 0, то +, если 1, то -)

9 килобайт = 9216 байт.
Зная информационный объём рассказа и количество страниц, найдём информационный объём одной страницы. В условии сказано, что каждый символ кодируется 8 битами, т.е. одним байтом. Также мы знаем количество символов в одной строке. Умножив 1 байт на количество символов в строке, найдём информационный объём одной строки. И, наконец, разделив информационный объём страницы на информационный объём строки, найдём количество строк на странице.

1) 9216 : 6 = 1536 (байт) – информационный объём одной страницы.

2) 1 × 48 = 48 (байт) – информационный объём одной строки.

3) 1536 : 48 = 32 (стр.) – количество строк на каждой странице.

ответ: на каждой странице помещается 32 строки.

ПРАВИЛЬНЫЙ ОТВЕТ – 3) 32