цифры плохо видно так что ошибки имеют место быть
красный - это там где есть
синий - там где нет
Например, в маске *r*f* пять символов, ей удовлетворяют нужные имена файлов (<em>miste</em><em>r</em><em>_</em><em>f</em><em>ox</em>, <em>f</em><em>r</em><em>om_</em><em>f</em><em>oxford</em>), но не удовлетворяют ненужные (<em>brave_oxygen</em> – нет f, <em>magic_fox</em> – нет r).
Масок из меньшего количества символов, удовлетворяющих условию нет:
- Начальные символы <em>mister_fox</em> и <em>from_foxford</em> разные, так что маски должны начинаться с звездочек
- Аналогично, и заканчиваться они должны на звездочку. Таким образом, два символа маски известны
- Если в маске всего 3 символа, то неизвестный символ – символ, который должен быть в нужных словах, но которого не должно быть в ненужных. В обоих нужных словах есть символы m, r, _, f, o, x, но каждый из этих символов есть хотя бы в одном ненужном
- Если в маске 4 символа, то неизвестная пара символов – символы, стоящие подряд, которые есть в нужных словах и которых нет в ненужных. В нужных словах совпадают только пары символов, входящие в <em>_fox</em>, но этот же фрагмент входит и в magic_fox
Там где символы не понятные это разделители задач, 3 из 4
program task;
const n=15;
var a:array[1..n] of integer;
i,s,j,first,max: integer;
begin
óñëîâèå À
begin
a[i]:=0+random(15);
write(a[i]:4);
if(i mod 2=0) then
s:=s + a[i];
end;
çàäà÷à Á
begin
a[i]:=0+random(15);
write(a[i]:4);
end;
writeln();
max:=1;
for i:=1 to n do
if a[i]>a[max] then max:=i;
first:=a[1];
a[1]:=a[max];
a[max]:=first;
writeln('Âåêòîð:');
for i:=1 to n do
çà÷à Â
for i:= 1 to 15 do begin
a[i]:= random(20);
write(a[i],' ');
if a[i] > 0 then
end;
writeln;
writeln;
for i:= 1 to 14 do
for j:= i+1 to 15 do
if a[i] < a[j] then begin
max:= a[i];
a[i]:= a[j];
a[j]:= max;
end;
for i:= 1 to 15 do begin
write(a[i],' ');
end;
end.
Одеждой техника не та орудие
Объяснение:
42,95,75,54
*мне не хватает необходимых символов, чтобы отправить ответ, поэтому я написал это