с форматированием текста по информатике: 1. Установите колонтитул. В нем укажите дату, время создания документа, название документа, используйте курсив, кегль № 8, в названии документа предусмотрите курсив, полужирный.

2. Выделите первый абзац, оформите его шрифтом кегль №14. Установите границы абзаца: отступ слева 1 см; отступ справа 10см, красная строка должна начинаться с 2 см (первая строка, отступ).

3. Установите границы страницы: левое поле – 2 см; правое поле – 1,8 см; нижнее поле – 2,2 см; верхнее поле – 2 см.

4. Предусмотрите в заголовке все буквы прописные, гарнитура полужирная, после заголовка «отбейте» пустой абзац, высота букв – кегль № 16.

5. В датах используйте цвет шрифтового оформления – красный.

6. В названиях систем счисления используйте гарнитуру шрифтов к

7. В четвертом абзаце в слове Нейрокомпьютер предусмотрите буквицу.

8. Шестой абзац поделите на 2 колонки

9. В числах во всем тексте предусмотрите стиль шрифта Mistral, кегль 12, полужирный.

10. Вставьте подходящий рисунок, сделайте его подложкой. Подпишите рисунок, например, Рис. 1. Множество чисел. Перед названием рисунка и после предусмотрите пустую строку.

Сам текст, который надо форматировать, находится в прикреплённом файле.

Версия языка не указана, поэтому сделал в самой последней и в самой старой, которая нашлась.

// PascalABC.Net 3.0
function F(a, b, x: double):= (1 + Power(a, x)) / ((b - x) * Power(sin(x), 3));

const
  a = 3.45; b = 1.62;

var
  x := 0.1; xe := 3.1; h := 0.15;
  y, xn, yn, xp, yp: double;

begin
  yp := MaxDouble; yn := yp;
  repeat
    y := F(a, b, x);
    if y > 0 then
    begin if y < yp then begin yp := y;xp := x end end
    else
    if y < 0 then
    begin if y < yn then begin yn := y;xn := x end end;
    x += h;
  until x > xe;
  Writeln('Минимальное отрицательное ', yn, ' при х=', xn);
  Writeln('Минимальное положительное ', yp, ' при х=', xp)
end.

Тестовое решение:
Минимальное отрицательное -446219.37704747 при х=3.1
Минимальное положительное 11.837734702392 при х=0.85

{ Borland Pascal 7.01 }
{$G+} {$N+}
uses Crt;

function F(a,b,x:double):double;
begin
  F:=(1+exp(x*ln(a)))/((b-x)*exp(3*ln(sin(x
end;

const
  a = 3.45; b = 1.62;
var
  x,xe,h,y,xn,yn,xp,yp:double;
begin
  ClrScr;
  x := 0.1; xe := 3.1; h := 0.15;
  yp := 1E308; yn := yp;
  repeat
    y := F(a, b, x);
    if y > 0 then
    begin if y < yp then begin yp := y; xp := x end end
    else
    if y < 0 then
    begin if y < yn then begin yn := y; xn := x end end;
    x := x + h;
  until x > xe;
  Writeln('Минимальное отрицательное ', yn, ' при х=', xn);
  Writeln('Минимальное положительное ', yp, ' при х=', xp);
  ReadKey
end.  

Тестовое решение:
Минимальное отрицательное -4.46219377047470E+0005 при х= 3.10000000000000E+0000
Минимальное положительное  1.18377347023920E+0001 при х= 8.50000000000000E-0001

В каком смысле? Его информационный вес?
Вес одного символа (Включая точки, запятые, пробелы и т.д) равен 8 битам.
Например.
Кошка мурлычет. Вес этого предложения равен:
I = i · k.
I - это информационный объём всего сообщения.
i - это информационный объём одного символа.
k - это количество символов во всём сообщении.
То есть, количество символов умножить на вес одного символа. В данном случае получим 15 · 8 = 120 (В битах. Если нужно перевести в байты, то 120 : 8 = 15 байт (Т.к. в одном байте содержится 8 бит)).
Надеюсь, ответ достаточно исчерпывающий.