Файл размером 16кбайт передаётся через некотрое соединение за 32 секунды.определите за сколько можно передать этот же файл через соединение , скорость которого в 16 раз больше
Для перевода из двоичной в шестнадцатеричный надо код разделить на тетрады (на группы по 4 цифры): 0101 1101 1000 1010 1010 1111 0010 1010 Если слева недостаточно цифр до тетрады, то слева добавляем нули. Далее переводим тетрады в шестнадцатеричный код с таблицы: 0000 => 0 0001 => 1 0010 => 2 0011 => 3 0100 => 4 0101 => 5 0110 => 6 0111 => 7 1000 => 8 1001 => 9 1010 => A 1011 => B 1100 => C 1101 => D 1110 => E 1111 => F 0101 1101 1000 1010 1010 1111 0010 1010 = 5D8AAF2A
Для перевода в восьмеричный код делаем аналогично, только на двоичный код делим на группы по 3 цифры: 001 011 101 100 010 101 010 111 100 101 010 И также если не хватает до 3-ех цифр, то слева добавляем нули. Затем переводим по аналогичной таблице: 000 => 0 001 => 1 010 => 2 011 => 3 100 => 4 101 => 5 110 => 6 111 => 7 001 011 101 100 010 101 010 111 100 101 010 = 13542527452
Program lab5; const n=5; Var P: array [1..n,1..n] of real; i, j : integer; Begin Randomize; writeln('Исходный массив P:'); for i:=1 to n do begin for j:=1 to n do begin P[i,j]:=10*random; write(P[i,j]:5:1); end; writeln; end; for i:=1 to n do for j:=1 to n do if j>i then P[i,j]:=0 else P[i,j]:=round(P[i,j]); writeln('Изменённый массив P:'); for i:=1 to n do begin for j:=1 to n do write(P[i,j]:5:1); writeln; end; End.
ответ: 2 секунды