На цифровом носителе сохранены два реферата. определите, какой реферат занимает больше памяти. реферат 1.*doс 2 кбайт реферат 2.*pdf 3072 байт объясните необходимость сохранения информации в pdf формате

2Кбайт - 2 килобайта.

2Kбайт в байтах равен 2000 байтам. А значит что, реферат под номером два, больше по размеру.

Необходимости сохранение информации в формате .PDF - особой нету. Единственное что хочется сказать что это удобно. Почему? Потому что, "случайный" пользователь не сможет отредактировать файл, изменить текст, что даёт поверхностную безопасность. Также хочется отметить, что формат .PDF удобнее дня чтение, если это електроная книга, и в отличии от .fb2 и .epub имеет разумный вес.

Подводя итог,
.PDF .epub .fb2 - форматы для чтение, пассивного потребления информации, без возможности редактирования.
Формат портативных устройств.

.doc .docx .txt - форматы для активного редактирования и потребления информации.
Формат профессиональных устройств, компьютеров.

// PascalABC.NET 3.0, сборка 1076
type
  Point=record
  x,y:real
  end;
  Line=record
  A,B:Point
  end;
  Triangle=record
  A,B,C:Point;
  sa,sb,sc:real; { длины сторон }
  end;

procedure GetPoint(PointName:char; var M:Point);
begin
  Write('Введите координаты точки ',PointName,'(x,y): ');
  Read(M.x,M.y)
end;

function LineLength(A,B:Point):real;
begin
  LineLength:=sqrt(sqr(B.x-A.x)+sqr(B.y-A.y))
end;
 
procedure CreateTriangle(var T:Triangle; var l:boolean);
begin
  With T do begin
    GetPoint('A',A);
    GetPoint('B',B);
    GetPoint('C',C);
    sa:=LineLength(B,C);
    sb:=LineLength(A,C);
    sc:=LineLength(A,B);
    l:=(sa+sb>sc) and (sa+sc>sb) and (sb+sc>sa)
  end
end;

function TriangleIsLikes(T1,T2:Triangle):boolean;
var
  k1,k2,k3:real;
begin
  k1:=T1.sa/T2.sa; k2:=T1.sb/T2.sb;
  if k1=k2 then begin
    k3:=T1.sc/T2.sc;
    TriangleIsLikes:=k1=k3
    end
  else
    TriangleIsLikes:=False
end;

var
  T1,T2:Triangle;
  legal:boolean;
begin
  Writeln('*** Первый треугольник ***');
  CreateTriangle(T1,legal);
  if legal then begin
    Writeln('*** Второй треугольник ***');
    CreateTriangle(T2,legal);
    if legal then
      if TriangleIsLikes(T1,T2) then Writeln('Треугольники подобны')
      else Writeln('Треугольники не подобны')
    else Writeln('Треугольник невозможно построить')
    end
  else Writeln('Треугольник невозможно построить')
end.

Объяснение:

Дано: 167₁₀

    167 |_2_

  - 166 | 83 |_2_

- 82 | 41  |_2_

         1   - 40 | 20 |_2_

                 1   - 20 | 10 |_2_

                         1 - 10 |  5  |_2_

                               0    - 4  |  2  |_2_

                                       0   - 2  |  1   |

                                              1  

                                                     0

167₁₀=10100111₂

Дано: 45₁₀

    45 |_2_

  - 44 | 22 |_2_

  - 22 | 11  |_2_

       1   - 10 |  5  |_2_

               0  - 4  |  2  |_2_

                      1     -2 |    1

                            1  

                                   0

45₁₀=101101₂