ВРЕМЯ 4 МИНУТЫ Для групповых операций с файлами используются маски имен файлов. Маска представляет собой последовательность букв, цифр и прочих допустимых в именах файлов символов, в которых также могут встречаться следующие символы: Символ «?» (вопросительный знак) означает ровно один произвольный символ. Символ «» (звездочка) означает любую последовательность символов произвольной длины, в том числе «» может задавать и пустую последовательность. Определите, какое из указанных имен файлов удовлетворяет маске: ?a???* Выберите ответ

dad1
add444
3daddy
dad22

👇

Увидеть ответ

Ответ:

puhova365

08.11.2020

Последний вариант:

dad22

4,5(98 оценок)

Открыть все ответы

Ответ:

виквик4

08.11.2020

Из небольших ускорений можно предложить проверять до b[c], дальше всё равно ничего нет. Но всё равно алгоритм будет делать порядка n^2 операций, что при n = 10^5 достаточно много. Кстати, 2*10^9 еще помещается в longint, int64 не нужен.

Можно пойти другим путём. Отсортируем массив A[i] за n log n, а потом для того, чтобы определить уникальные элементы, достаточно одного прохода по массиву.
Я буду сортировать сортировкой слиянием, вы можете использовать любую другую достаточно быструю сортировку.

procedure merge(var a: array of longint; left1, right1, left2, right2: integer);
var
temp: array of longint;
i, j, k: integer;

begin
setLength(temp, right1 - left1 + right2 - left2 + 2);
i := left1;
j := left2;
k := 0;
while (i <= right1) and (j <= right2) do
begin
if a[i] <= a[j] then
begin
temp[k] := a[i];
inc(i);
end else begin
temp[k] := a[j];
inc(j);
end;
inc(k);
end;
while i <= right1 do
begin
temp[k] := a[i];
inc(k);
inc(i);
end;
while j <= right2 do
begin
temp[k] := a[j];
inc(k);
inc(j);
end;
for i := left1 to right1 do
a[i] := temp[i - left1];
for j := left2 to right2 do
a[j] := temp[j - left2 + right1 - left1 + 1];
end;

procedure mergeSort(var a: array of longint; left, right: integer);
var
t: longint;

begin
if right - left = 0 then exit;
if right - left = 1 then
begin
if a[left] > a[right] then
begin
t := a[left];
a[left] := a[right];
a[right] := t;
end;
exit;
end;
mergeSort(a, left, (left + right) div 2);
mergeSort(a, (left + right) div 2 + 1, right);
merge(a, left, (left + right) div 2, (left + right) div 2 + 1, right);
end;

var
a: array of longint;
i, n, count: integer;

begin
read(n);
setLength(a, n);
for i := 0 to n - 1 do
read(a[i]);
mergeSort(a, 0, n - 1);
count := 1;
for i := 1 to n - 1 do
if a[i] <> a[i - 1] then
inc(count);
writeln(count);
end.

4,4(74 оценок)

Ответ:

darishka67854321

08.11.2020

HTML (от англ. HyperText Markup Language — «язык гипертекстовой разметки») — стандартизированный язык разметки документов во Всемирной паутине. Большинство веб-страниц содержат описание разметки на языке HTML (или XHTML). Язык HTML интерпретируется браузерами; полученный в результате интерпретации форматированный текст отображается на экране монитора компьютера или мобильного устройства.

Язык HTML является приложением SGML (стандартного обобщённого языка разметки) и соответствует международному стандарту ISO 8879.

Язык XHTML является более строгим вариантом HTML, он следует всем ограничениям XML и, фактически, XHTML можно воспринимать как приложение языка XML к области разметки гипертекста.

Во всемирной паутине HTML-страницы, как правило, передаются браузерам от сервера по протоколам HTTP или HTTPS, в виде простого текста или с использованием шифрования.

4,7(91 оценок)

Это интересно:

Здоровье

13.09.2021

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

Кулинария-и-гостеприимство

06.01.2022

Мастер-класс: как правильно готовить спаржу на плите...

Здоровье

21.10.2022

Опасный гость - как определять и лечить укусы паука отшельника...

Компьютеры-и-электроника