1. укажите имена файлов, соответствующих маске *.doc: а) всемирная.dos, б) замирание.doc; в) микромир.doc г)примирение.doc 2. пользователь работал с каталогом с: . затем он поднялся на два уровня вверх, перешёл в подкаталог фотографии и открыл файл фауна.jpg. запишите полное имя открытого файла. 3. запишите три разных имени файлов, удовлетворяющих маске wo? *.d*.

Объяснение:

1.

???мир*. doc

a) не подходит: расширение .dos

б) не подходит: должно быть 3 обязательных символа

в) не подходит: по той же причине, что б)

приМИРение.doc

???МИР*.doc

* - любое число символов, в том числе символа может и не быть.

2.

С:\Фотографии\Фауна.jpg

3.

word.doc

wor.d

would.dog

Интернет по сути своей не представляет опасности для подрастающего поколения. Вредоносное влияние оказывают многочисленные сайты и всплывающие окна рекламного характера. Помимо образовательной роли виртуальная реальность таит и множество негативных моментов, в особенности для детей. Это может быть:

незаконный контент: «взрослая» реклама табака, алкоголя, секса, азартные игры, порнография;платные сервисы и услуги, которые оплачиваются отдельно;призывы к асоциальному поведению, насилию и жестокости;пропаганда сексуальной эксплуатации и суицидального поведения;общение на форумах и чатах с мошенниками, аферистами и преступниками под личиной доброжелателей;вынуждение предоставления личной информации ребенка или его семьи, которая может быть использована в преступных целях;Интернет-зависимость.

Const nx=30;var i,j,p,n:integer;A:array[1..nx,1..nx] of integer;d,Sn,min:real;begin p:=1;write('Введите размер матрицы');Read(n);for i:=1 to n do beginfor j:=1 to n do beginA[i,j]:=random(3)-2;write(A[i,j]:4);end;writeln;end;writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif i = j then begin if A[i,j]<> 0 then p:=p* A[i,j];write(A[i,j]:4);endelse write(' ':4);end;writeln;end;write('p =',p);writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif (i= n -j +1) then begin if A[i,j]<> 0 then p:=p* A[i,j];write(A[i,j]:4);endelse write(' ':4);end;writeln;end;write('p =',p);end.