Составить логическое выражение по схеме и построить таблицу истинности ( ) ПОАЖУЙСТААА

1 набор текста;

2 вырезание кусков текста, запоминание их в течении текущего сеанса работы, а также в виде отдельных файлов;

3 вставка кусков в нужное место текста;

4 замена слов одно на другое частично или полностью по всему тексту;

5 нахождение в тексте нужных слов или предложений;

6 форматирование текста, т.е. придание ему определенного вида по следующим параметрам: ширина текстовой колонки, абзац, поля с обеих сторон, верхнее и нижнее поле, расстояние между строками, выравнивание края строк;

7 автоматическая разбивка текста на страницы с заданным числом строк;

8 автоматическая нумерация страниц;

9 автоматический ввод подзаголовков в нижней или верхней части страницы;

10 выделение части текста жирным, наклонным или подчеркнутым шрифтом;

11 переключение программы для работы с другим алфавитом;

12 табуляция строк, т.е. создание постоянных интервалов для представления текста в виде колонок;

13 при вводе текста вы упираетесь в конец строки, Word автоматически делает переход на следующую строку;

14 если при вводе текста делается опечатка, функция автокоррекции автоматически ее исправляет. А функция автоматической проверки орфографии подчеркивает неправильно написанные слова красной волнистой линией, чтобы их было легче увидеть и исправить;

15 если пользоваться дефисами для выделения пунктов списка, употреблять дроби, знак торговой марки или другие специальные символы, функция автоформатирования будет сама их корректировать;

16 возможность вставки в текст формул, таблиц, рисунков;

17 возможность создания нескольких текстовых колонок на одной страницы;

18 выбор готовых стилей и шаблонов;

19 для представления текста в виде таблицы можно, конечно, пользоваться и табулятором, однако Microsoft Word предлагает гораздо более эффективные средства. А если таблица содержит цифровые данные, то их легко превратить в диаграмму;

20 режим предварительного просмотра позволяет увидеть документ в том виде, в каком он выйдет из печати. Кроме того, он дает возможность отобразить сразу все страницы, что удобно для внесения изменений перед распечаткой.

Const
  n = 11;

var
  x: array[1..n] of integer;
  i, k, d, s: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  k := 0; s := 0;
  for i := 1 to n do
  begin
    d := Random(11) - 5;
    Write(d:3);
    if (i mod 2) = 0 then begin { четное место }
      if d = 1 then Inc(k);
      x[i] := d
    end
    else begin
      if d < 0 then s := s + d;
      x[i] := sqr(d)
    end
  end;
  Writeln;
  Writeln('Результирующий массив');
  for i := 1 to n do Write(x[i]:3);
  Writeln;
  Writeln('Количество единиц на четных местах равно ', k);
  Writeln('Сумма отрицательных элементов на нечетных местах равна ', s)
end.

Тестовое решение:
Элементы массива
 -3  0 -5  1  5  1 -3 -4  5 -3 -2
Результирующий массив
  9  0 25  1 25  1  9 -4 25 -3  4
Количество единиц на четных местах равно 2
Сумма отрицательных элементов на нечетных местах равна -13