A»: а) Заполните все элементы массива из 10 элементов значением X , введённым с клавиатуры. , б) Заполните массив из 10 элементов последовательными натуральными числами, начиная с X (значение X введите с клавиатуры). , «B»: а) Заполните массив из 10 элементов натуральными числами в обратном порядке, начиная со значения X, введённого с клавиатуры. Последний элемент должен быть равен X, предпоследний равен X–1 и т.д. , б) Заполните массив из 10 элементов степенями числа 2 (от 21 до 2N), так чтобы элемент с индексом i был равен 2i.
var
n, Num, i, j, t: integer;
Count: array[1..12] of integer;
Names: array[1..12] of integer;
begin
for i := 1 to 12 do
begin
Count[i] := 0;
Names[i] := i;
end;
ReadLn(N); { Считываем количество запросов}
for i := 1 to N do
begin
ReadLn(t); {считали очередной запрос}
Count[t] := Count[t] + 1;
end;
{Сортируем массивы Names и Count в порядке убывания значений массива Count}
for i := 12 downto 2 do
for j := 2 to i do
if Count[j - 1] < Count[j] then
begin
t := Count[j];
Count[j] := Count[j - 1];
Count[j - 1] := t;
t := Names[j];
Names[j] := Names[j - 1];
Names[j - 1] := t;
end;
for i := 12 downto 1 do
if Count[i] > 0 then
WriteLn(Names[i], ' ', Count[i]);
end.
Объяснение:
1 набор текста;
2 вырезание кусков текста, запоминание их в течении текущего сеанса работы, а также в виде отдельных файлов;
3 вставка кусков в нужное место текста;
4 замена слов одно на другое частично или полностью по всему тексту;
5 нахождение в тексте нужных слов или предложений;
6 форматирование текста, т.е. придание ему определенного вида по следующим параметрам: ширина текстовой колонки, абзац, поля с обеих сторон, верхнее и нижнее поле, расстояние между строками, выравнивание края строк;
7 автоматическая разбивка текста на страницы с заданным числом строк;
8 автоматическая нумерация страниц;
9 автоматический ввод подзаголовков в нижней или верхней части страницы;
10 выделение части текста жирным, наклонным или подчеркнутым шрифтом;
11 переключение программы для работы с другим алфавитом;
12 табуляция строк, т.е. создание постоянных интервалов для представления текста в виде колонок;
13 при вводе текста вы упираетесь в конец строки, Word автоматически делает переход на следующую строку;
14 если при вводе текста делается опечатка, функция автокоррекции автоматически ее исправляет. А функция автоматической проверки орфографии подчеркивает неправильно написанные слова красной волнистой линией, чтобы их было легче увидеть и исправить;
15 если пользоваться дефисами для выделения пунктов списка, употреблять дроби, знак торговой марки или другие специальные символы, функция автоформатирования будет сама их корректировать;
16 возможность вставки в текст формул, таблиц, рисунков;
17 возможность создания нескольких текстовых колонок на одной страницы;
18 выбор готовых стилей и шаблонов;
19 для представления текста в виде таблицы можно, конечно, пользоваться и табулятором, однако Microsoft Word предлагает гораздо более эффективные средства. А если таблица содержит цифровые данные, то их легко превратить в диаграмму;
20 режим предварительного просмотра позволяет увидеть документ в том виде, в каком он выйдет из печати. Кроме того, он дает возможность отобразить сразу все страницы, что удобно для внесения изменений перед распечаткой.