В какой вкладке строки меню имеет команда оглавление?​

1) 145 (10 сс) - 10010001 (2 сс)

145 (10 сс) - 221 (8 сс)

145 (10 сс) - 91  (16 сс)

2) 854 (10 сс) - 1101010110 (2 сс)

854 (10 сс) - 1526 (8 сс)

854 (10 сс) - 356  (16 сс)

Объяснение:

145 (10 сс) - 10010001 (2 сс)

145 делим в столбик на 2 без остатка. 145/2=72 (145-144=1), далее 72/2=36 (72-72=0), 36/2=18 (36-36=0), 18/2=9 (18-18=0), 9/2=4 (9-8=1), 4/2=2 (4-4=0), 2/2=1 (2-2=0). Записываем в обратном порядке полученные цифры: 10010001.

145 (10 сс) - 221 (8 сс)

145 делим в столбик на 8 без остатка. 145/8=18 (145-144=1), 18/8=2 (18-16=2). Записываем в обратном порядке полученные цифры: 221

145 (10 сс) - 91  (16 сс)

145 делим в столбик на 16 без остатка. 145/16=9 (145-144=1).

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

Var i,n,mn,mx: integer;
    a: array of integer;
begin
{ считать количество чисел n }
  write('n = ');  readln(n);
{ установить длину массива а n+1,
  массив динамический, нумерация с нуля}
    i:=1;  setlength(a,n+1);
  writeln('введите числа через пробел:   ');
{циклический ввод n чисел с клавиатуры}
    repeat 
       read(a[i]);
       i:=i+1;
   until i>n;
{ конец ввода }
{ начальные значения для максимума  и минимума  mn  mx  }
  mn:=a[1];  mx:=a[1];
{ цикл по элементам массива }
    for i:=1 to n do
    begin
{ если элемент массива больше текущего максимума,
  то в максимум записать текущий элемент }
      if a[i]>mx then mx:=a[i];
{ если элемент массива меньше текущего минимума,
  то в минимум записать текущий элемент }
      if a[i]<mn then mn:=a[i];
  end;
{ конец цикла }
   writeln('min = ',mn,'  max = ',mx);
   writeln('разница:   (max - min) = ',mx-mn);
end.