Расстояние между соседними абзацами называется

Отступ первой строки — отступ перед абзацем, красная строка.

Отступы слева и справа — расстояние от края страницы до левой (и, соответственно, правой) границы абзаца.

1011010

Объяснение:

Алгоритм перевода в двоичную систему:

1)

Переводим модуль числа в двоичную систему

Выполнить деление исходного числа на 2. Если результат деления больше или равен 2, продолжать делить его на 2 до тех пор, пока результат деления не станет равен 1

2). Выписать результат последнего деления и все остатки от деления в обратном порядке в одну строку.

3) выполняем инверсию всех битов

4) к результату добавляем 1

Получается:

1) делим -89 на 2 = 44, остаток 1 -  пишем -1, т. к. остаток 1

2) 44/2=22, без остатка, пишем 0

3) 22/2=11, без остатка, пишем 0

4) 11/2=5, остаток 1, пишем 1

5) 5/2=2, остаток 1, пишем 1

6) 2/2=1, без остатка, пишем 0

7) 1/2=0, остаток 1, пишем 1

Записываем в обратном порядке полученные 7 цифр 1011001

3) 0100110

4) 0100110

+               1

получаем 1011010

Результат работы и листинг программы в приложениях.
Написано в PascalABC.NET но должно работать во всех Паскалях.

----------------------------

PROGRAM A20;

CONST
    max = 100;
TYPE
    matrix = array[1..max,1..max]of shortint;
VAR
    ar:matrix;
    num:byte;
    i,j:byte;
    a,b,c:byte;
    q:boolean;

BEGIN
  repeat
  //  num := 5;
    write('Введите размер матрицы n=');
    readln(num);
   
    for i:=1 to num do begin
      for j:=1 to num do
        read(ar[i,j]);
    end;
 
    i:=1;//диагональ
    q:=true;
   
    while q and (i<num) do begin
      j:= i+1;//колонка и ряд
      while q and (j<=num) do begin
        a := ar[j,i];
        b := ar[i, j];
       
        if (ar[j,i] <> ar[i, j])
          then q:=false;
        j:=j+1;
      end;
      i:=i+1;
    end;
   
    if q then
      writeln('YES')
    else
      writeln('NO');
   
    write('Введите 1 чтобы продолжить. 0 чтобы завершить');
    readln(i)
  until(i=0); 
END.