ВО И ЗАДАНИЯ
1. При какой какой пиктограммы на панели инструментов мож-
но распечатать документ?
саких случаях для распечатки документа используют меню
файл?
Можно ли одновременно напечатать страницы документа без
поочередности?
как можно распечатать несколько страниц на одном листе?
Как можно распечатать только выделенную часть текста?
Как можно распечатать только четные страницы?
Как можно распечатать только нечетные страницы?
Как распечатать 5 копий одной страницы?
Расскажите, при каких действий можно распечатать
кумент в виде книжки

Пусть X - любая из гласных (а или е), Y - любая из согласных (б, в, г, д).
Тогда слова, в которых гласных больше, чем согласных, будут иметь вид:
- количество таких слов 2^5 = 32
Y - количество таких слов 2^4*4 = 16*4 = 64
XXXYX - количество таких слов 2^4*4 = 16*4 = 64
XXYXX - количество таких слов 2^4*4 = 16*4 = 64
XYXXX - количество таких слов 2^4*4 = 16*4 = 64
Y - количество таких слов 2^4*4 = 16*4 = 64
XXXYY - количество таких слов 2^3*4^2 = 8*16 = 128
XXYYX - количество таких слов 2^3*4^2 = 8*16 = 128
XYYXX - количество таких слов 2^3*4^2 = 8*16 = 128
YYXXX - количество таких слов 2^3*4^2 = 8*16 = 128
XXYXY - количество таких слов 2^3*4^2 = 8*16 = 128
XYXYX - количество таких слов 2^3*4^2 = 8*16 = 128
YXYXX - количество таких слов 2^3*4^2 = 8*16 = 128
XYXXY - количество таких слов 2^3*4^2 = 8*16 = 128
YXXYX - количество таких слов 2^3*4^2 = 8*16 = 128
YXXXY - количество таких слов 2^3*4^2 = 8*16 = 128
Итого: 32+5*64+10*128 = 32+320+1280  = 1632

CodePascal

const  amax = 100; var  a: array [1..amax] of integer;  i, n, ch, num: integer; begin  Writeln('Введите размер массива');  Readln(n);  ch := 0;  Writeln('Исходный массив');  for i := 1 to n do  begin    a[i] := Random(1, 100);    Write(a[i], '  ');    if not odd(a[i]) then begin      ch := a[i];      num := i;    end;  end;  Writeln;  writeln('Последний четный элемент массива: ', ch, '[', num, ']'); end.

Тестовое решение:

Введите размер массива

10

Исходный массив

58  50  43  68  74  45  74  20  83  11  

Последний четный элемент массива: 20[8]