, решить (с кругов Эйлера)! Некоторый сегмент сети Интернет состоит из 1000 сайтов. Поисковый сервер в автоматическом режиме составил таблицу ключевых слов для сайтов этого сегмента. Вот ее фрагмент:
Ключевое слово // Количество сайтов
Скань // 250
Хохлома // 350
Финифть // 300

В запросах для обозначения логической операции «И» используется символ &.
СКОЛЬКО сайтов будет найдено по запросу скань & хохлома & финифть, если по запросу скань & хохлома было найдено 250 сайтов, а по запросу скань & финифть — 80?

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

2.Текстовая информация - это информация, представленная в алфавитно-цифровой форме. Алфавитно-цифровая форма представления информации - форма, в которой информация представляется в виде текста, записанного на каком-либо языке: русском, белорусском, английском и т. д. Алфавит - множество символов, используемых для записи текста на каком-либо языке.

3.Дешифровка — анализ документа, написанного на неизвестном языке и/или неизвестной системой письма. Чаще всего термин используется по отношению к прочтению древних документов. О шифровании сообщений и соответствующих математических методах см. статью Криптография.

4.Симметричное шифрование использует один и тот же ключ и для зашифровывания, и для расшифровывания.

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

Объяснение:

Program z18;  Var a: array [1..1000] of string; i,j,l,min,h:integer; s:string;Begin  write('Введите строку - '); readln(s);  l:=s.Length;  i:= 1;  j:= 1;    while i <= l do  begin    while (s[i] <> ' ') and (i <= l) do    begin      a[j]:=a[j] + s[i];      i:= i + 1;      if (i > l) then break;    end;    j:= j + 1;    i:= i + 1;  end;    i:= 2;  min:=a[1].Length;  while (a[i] <> '') do  begin    l:=a[i].Length;    if (l < min) then h:= i;    i:= i + 1;  end;  writeln(a[h]);End.

Program z19;  Var a: array [1..1000] of string; i,j,l,min:integer; s:string;Begin  write('Введите строку - '); readln(s);  l:=s.Length;  i:= 1;  j:= 1;    while i <= l do  begin    while (s[i] <> ' ') and (i <= l) do    begin      a[j]:=a[j] + s[i];      i:= i + 1;      if (i > l) then break;    end;    j:= j + 1;    i:= i + 1;  end;    i:= 1;  while (a[i] <> '') do  begin    if ((a[i] = 'мое') or (a[i] = 'Мое')) then a[i]:= 'наше';    write(a[i], ' ');    i:= i + 1;  end;End.