Скажи на что указывает знак галочки в пункте меню?)
​

1) библиотекарь;

2)вычислитель;

3)пишущая машинка;

4)делопроизводитель;

5)личный секретарь;

6)бухгалтер;

7)справочное бюро;

8)издатель;

9)переводчик;

10)почтальон;

11)художник;

12)мультипликатор;

13)конструктор;

14)модельер;

15)архитектор;

16)дизайнер;

17)композитор и музыкант;

18)врач;

19)учитель;

20)игротека.

вообще говоря компьютер не может владеть профессиями. 

профе́ссия (лат.  professio; от profiteor «объявляю своим делом»[1])  — род трудовой деятельности человека, владеющего комплексом теоретических знаний и навыков, приобретённых в ходе специальной подготовки.

потому, что компьютер - это не человек и не имеет собственного мнения или выбора.

компьютер может выполнять рутинную часть работы   многих профессий, вплоть до того, что вместо целого цеха можно оставить лишь одного человека-наблюдателя/компьютерного оператора.

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

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

еще компьютер обеспечивает более удобный способ ведения учетности книг, но без человека ему все равно не обойтись, так как не может взаимодействовать с книгами напрямую.

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
function
Transpose(a: array[,] of integer): array[,] of integer;
//Поворот на 90гр по часовой стрелке
begin
  var m := Length(a, 0);
  var n := Length(a, 1);
  Result := new integer[n, m];
  for var i := 0 to n-1 do begin
    for var j := 0 to m-1 do
      Result[i, j] := a[m-1-j, i];
  end;
end;

begin
  var n := ReadInteger('Введите n:');
//Заполнение матрицы NxN сл. числами и вывод на экран
  var a :=MatrixRandom(n, n);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(a[i,j]);
    println;
    end;
     println;

  Println('поворот влево на 90 гр');
  var b := Transpose(a);
  b:=Transpose(b);
  b:=Transpose(b);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
  println;

  Println('поворот вправо на 90гр');
  b := Transpose(a);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
 println;

 Println('поворот на 180 гр');
  b := Transpose(a);
  b := Transpose(b);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
end.