Рассмотрите ситуации Алишер рисовалка для своей заставки на компьютер с встроенного графического редактора Алина скопировала фон с интернета со знаком с официального сайта известного бренда Определите ситуацию в которой были нарушены авторские права Укажите причины по которым права были нарушены​

У вас есть число 137
если вам надо перевести его в какую-нибудь систему счисления, то нужно делить это число на номер системы, так если нужно перевести число 137 в ДВОичную ,то делим на 2 до тех пор, пока остатотк от деления не равен 1.(если в ТРОичную то на 3 и т.д.).
начнём:
137 / 2 = 68 выписываем остаток (1) 
68   / 2 = 34 выписываем остаток (0)
34   / 2 = 17 выписываем остаток (0)
17   / 2 = 8   выписываем остаток (1)
8     / 2 = 4   выписываем остаток (0)
4     / 2 = 2   выписываем остаток (0)
2     / 2 = 1  <==   на этой единице заканчиваем деление, далее снизу вверх выписываем получившееся число : 001001;
ответ: 001001

Const
  n=6;
  a:array[1..n] of string=
    ('Иванов','Петров','Сидоров','Козлов','Баранкин','Пупкин');
  b:array[1..n] of real=(15,13.9,16.1,14.2,14.5,15.3);
  // массивы используются чтобы избежать в примере ручного ввода
var
  i,j,k:integer;
  t:real;
  s:string;
  sa:array[1..n] of string;
  sb:array[1..n] of real;
begin
  for i:=1 to n do begin sa[i]:=a[i]; sb[i]:=b[i] end;
  // сортировка по возрастанию времени
  for i:=1 to n-1 do
    for j:=1 to n-1 do
      if sb[j]>sb[j+1] then begin
        s:=sa[j]; sa[j]:=sa[j+1]; sa[j+1]:=s;
        t:=sb[j]; sb[j]:=sb[j+1]; sb[j+1]:=t
        end;
  // вывод
  for i:=1 to 4 do Writeln(sa[i],' - ',sb[i])
end.

Пример
Петров - 13.9
Козлов - 14.2
Баранкин - 14.5
Иванов - 15