Определите, какое из указанных имен файлов не удовлетворяет маске: *?ad?.d* Выберите один ответ: a. parady.dc b. 4ad4.docum c. cado.doc d. 4padron.doc Определите, какое из указанных имен файлов не удовлетворяет маске: ?*o??.*t Выберите один ответ: a. fon_ton1.ppt b. cobr.pt c. ooo.ppt d. ozon2.mult Определите, по какой из масок будет выбрана указанная группа файлов: 1234.xls 23.xml 234.xls 23.xml Выберите один ответ: a. *23*.??? b. ?23?.x* c. ?23?.x?? d. *23*.?x* В каталоге находятся пять файлов: fort.docx ford.docx lord.doc orsk.dat port.doc Определите, по какой из масок будет выбрана указанная группа файлов: fort.docx ford.docx lord.doc port.doc Выберите один ответ: a. ?or?.doc? b. ?o*?.d* c. *o?*.d?* d. *or*.doc?

1) d

2) с

3) a

4) b

Объяснение:

1) 4padron.doc - после d в имени может быть только один символ

2) ooo.ppt - перед первым символом "o" должен быть еще хотя бы один символ

3) *23*.???

4) ответ "с" не подходит, потому что тогда бы выбрался и файл "orsk.dat"

ЕСЛИ НУЖНА БЫЛА МУЗЫКА, ТО ВОТ)

Алгоритм Ваших действий будет следующим:

1.Спеть 1-й куплет.

2.Спеть припев.

3.Спеть 2-й куплет.                                                                                                               4.Спеть припев.                                                                                                                           5.Спеть 3-й куплет.                                                                                                                   6.Спеть припев.

Объяснение:

program spk;

var i,s,k:integer;

p:real;

a:array [1..10] of integer;

begin

for i:=1 to 10 do a[i]:=random(81)-30;

for i:=1 to 10 do write(a[i],'  ');

for i:=1 to 10 do if i mod 2 = 0 then s:=s+a[i];

p:=1;

for i:=1 to 10 do if a[i] < 0 then p:=p*a[i];

for i:=1 to 10 do if a[i] mod 2 <> 0 then k:=k+1;

write('s = ',s,'   p = ',p,'   k = ',k);

end.

Объяснение:

program spk;

var a:array [1..10] of integer;

i,s,k:integer;

p:real;

begin

p:=1;

write('Массив: ');

for i:=1 to 10 do

begin

a[i]:=random(81)-30;

write(a[i],'  ');

if i mod 2 = 0 then s:=s+a[i];

if a[i] < 0 then p:=p*a[i];

if a[i] mod 2 <> 0 then k:=k+1

end;

writeln;

writeln('Сумма элементов массива, с четными номерами, равна ',s);

writeln('Произведение отрицательных элементов равно ',p);

writeln('Количество нечётных элементов равно ',k)

end.