Выберите варианты, которые соответствуют недостаткам визуальных редакторов.

а) Генерируют код нерационально: код получается избыточным, так как для гарантированного достижения нужного визуального эффекта программа дописывает очень много лишних тегов и атрибутов.

б) HTML-документы, созданные визуальными средствами, обычно содержат больше кодов, чем страницы, созданные вручную.

в) Часто визуальные редакторы используют множество пустых вложенных списков или таблиц для реализации горизонтальных отступов и других функций форматирования.

г) Web-страницы занимают больший объём памяти, дольше грузятся.

д) Большое количество настроек редактора.

Какие тэги ограничивают основную часть документа?
какие тэги используются для оформления текста в виде нумерованного списка?
Какие тэги используются для оформления цитат?

Объяснение:

const

 max_elements = 1000;

 a = 1;

 b = 15;

 first_file_name = '1.txt';

 second_file_name = '2.txt';

var

 i, j, n, r:integer;

 p:real;

 ar:array[1..max_elements] of integer;

 f1, f2:text;

begin

 randomize;

 writeln('Input n = ');

 readln(n);

 for i:=1 to n do begin

   ar[i]:=random(b-a+1)+a;

 end;

 assign(f1, first_file_name);

 rewrite(f1);

 for i:=1 to n do begin

   writeln(f1, ar[i]);

 end;

 close(f1);

 assign(f2, second_file_name);

 rewrite(f2);

 for i:=1 to n do begin

   p:=1;

   for j:=1 to i do

     p:=p*ar[j];

   writeln(f2, p:0:0);

 end;

 close(f2);

 readln;

end.

procedure CalcArray (const Ax: array of Integer; var S: Integer; var M: Real);  // var в параметрах означает, что переменная используется для возврата значения

var

 i, c: Integer;

begin

 S := 0;

 c := 0;

 for i := 0 to High (Ax) do begin

   S := S + Ax [i];   // здесь накапливаем сумму элементов

   c := c + 1;

 end;

 M := S / c;   // когда найдена сумму, рассчитываем среднеарифметическое

end;

var

 A: array [0..4] of Integer;     // размерность массивов можно делать любой, но начинаться с 0

 B: array [0..14] of Integer;

 C: array [0..9] of Integer;

 i, s: Integer;

 m: Real;

begin

 SetConsoleCP (1251);

 SetConsoleOutputCP (1251);

 Randomize;   // инициализация датчика случайных чисел

 WriteLn ('Массив 1:');

 for i := Low (A) to High (A) do begin

   A [i] := Random (10);   // заполняем элементы массива случайными значениями

   Write (IntToStr (A [i]) + ' ');   // выводим их для вызов процедуры

 WriteLn;   // показываем возвращаемые из функции переменные

 WriteLn ('Сумма элементов = ' + IntToStr (s));

 WriteLn ('Среднеарифметическое = ' + FloatToStr (m));

 WriteLn;   // аналогично поступаем с другими массивами

 WriteLn ('Массив 2:');

 for i := Low (B) to High (B) do begin

   B [i] := Random (10);

   Write (IntToStr (B [i]) + ' ');

 end;

 CalcArray (B, s, m);

 WriteLn;

 WriteLn ('Сумма элементов = ' + IntToStr (s));

 WriteLn ('Среднеарифметическое = ' + FloatToStr (m));

 WriteLn;

 WriteLn ('Массив 3:');

 for i := Low (C) to High (C) do begin

   C [i] := Random (10);

   Write (IntToStr (C [i]) + ' ');

 end;

 CalcArray (C, s, m);

 WriteLn;

 WriteLn ('Сумма элементов = ' + IntToStr (s));

 WriteLn ('Среднеарифметическое = ' + FloatToStr (m));

end.