Как изменятся размеры файлов с растровым и векторным изображением, если каждое из них открыть, сжать по вертикали в 2 раза и сохранить? ВАРИАНТЫ ОТВЕТА: Уменьшится для векторного, не изменится для растрового Уменьшаться для обоих изображений Не изменятся для обоих изображений Уменьшаться для растрового, не изменится для векторного

1) для перевода из 10-й в двоичную 2-ую систему счисления нужно число в десятичной системе разделить на 2 и записать остаток , затем тоже самое сделать с целой часть и повторять пока не останется только 1 или 0. конечное числом будут остатки записанные в обратном порядке.

1450/ 2 = 725 остаток 0

725 / 2 = 362 остаток 1

362 / 2 = 181 остаток 0

181 / 2 = 90 остаток 1

90 / 2 = 45 остаток 0

45/ 2 = 22 остаток1

22/2 = 11 остаток 0

11/ 2 = 5 остаток 1

5 / 2 = 2 остаток 1

2 / 2 = 1 остаток 0

1 / 2 = 0 остаток 1

 

результат: 10110101010

 

в 2-х байтовой ячеке всего 16 разрядов, а в наше числе 11 , значит спереди нужно дописать 5 нулей и получим нужное представление

0000010110101010

 

2)

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

вот 1450 в 2-й системе

0000010110101010

обратный код это код в котором все 0 заменены на 1, а 1 на 0

1111101001010101

чтобы получит дополнительный код нужно прибавить 1

1111101001010110

теперь смотрим по 4 разряда и заменяем 1 символом в 16 системе счисления

1111 = f

1010 = a

0101 = 5

0110 = 6

искомое число fa56

3)

  для перевода из 16 в 2 систему счисления нужно каждую цифру числа умножит на 16 в степень равным номеру цифры(справа на лево, отсчет с 0)

f67d(в 16 системе счисления) = 15 * 16 ^3 + 6 * 16 ^2 + 7 * 16^1 + 13 * 16 ^0 = 61440 + 1536 + 112 + 13 = 63101(в 10 системе счисления)

//Pascal
var
  A: array [1 .. 5, 1 .. 4] of integer;
  V: array [1 .. 20] of integer;
  i, j, z: byte;
  SUM1, SUM2, SUM3, MIN: integer;
begin
  randomize;
  writeln('***Сгенерированный массив***');
  SUM1 := 0; SUM2 := 0; SUM3 := 0;
  for i := 1 to 5 do
  begin
    for j := 1 to 4 do
    begin
      A[i, j] := random(30);
      if ((A[i, j] >= 0) and (A[i, j] <= 5)) then SUM1 := SUM1 + A[i, j];
      if ((A[i, j] >= 5) and (A[i, j] <= 15)) then SUM2 := SUM2 + A[i, j];
      write(A[i, j]:6)
    end;
    writeln;
  end;
  writeln('Сумма элементов [0 5] = ', SUM1);
  writeln('Сумма элементов [5 15] = ', SUM2);
  MIN := A[3, 1];
  for j := 1 to 4 do if A[3, j] < MIN then MIN := A[3, j];
  writeln('Минимальный элемент в третьей строке = ', MIN);
  writeln('***Вектор***');
  j := 1;
  z := 0;
  while (z < 20) do
  begin
    for i := 1 to 5 do
    begin
      z := z + 1;
      V[z] := A[i, j];
    end;
    j := j + 1;
  end;
  for i := 1 to 20 do writeln(V[i]:6);
  for i := 20 downto 10 do SUM3 := SUM3 + V[i];
  writeln('Сумма последних 10-ти элементов = ', SUM3);
  readln;
end.