1 Информационная безопасность — практика предотвращения несанкционированного доступа, использования, раскрытия, искажения, изменения, исследования, записи или уничтожения информации. Это универсальное понятие применяется вне зависимости от формы, которую могут принимать данные
Объяснение:
2 Сегодня более 60% пользователей Интернета – молодые люди в возрасте от 14 до 30 лет. По прогнозам экспертов, с внедрением в рамках национального проекта "Образование" Интернета в школы, этот процент возрастет в несколько раз, так как доступ к глобальной сети получат дети. В то же время глобальная сеть остается опасной, для детей и подростков средой. С одной стороны в свободном доступе находятся сайты с агрессивным и социально опасным содержанием. С другой, образовательные, социально-полезные, позитивные, ориентированные на молодежь ресурсы существуют в недостаточном количестве или не отвечают современным требованиям.
Необходимо обеспечить безопасность детей и молодежи при использовании сети Интернет с технических средств и отслеживания интернет-ресурсов негативного содержания. Помимо этого – нужно разработать комплексную программу создания и поддержки молодежных интернет-ресурсов позитивной направленности всестороннему развитию детей и молодежи, активному их вовлечению в социальную и общественную жизнь, воспитанию гражданской позиции и ответственности перед обществом.
3 Интернет-мошенничество — вид мошенничества с использованием Интернета. Оно может включать в себя сокрытие информации или предоставление неверной информации с целью вымогательства у жертв денег, имущества и наследства.
//"Школьный" вариант //Pascal ABC.NET 3.1 сборка 1256
Const n=10;
Var ar:array[1..n] of integer; i,max,min:integer; b:boolean; begin randomize; b:=false; max:=integer.MinValue; min:=integer.MaxValue; writeln('Array:'); for i:=1 to n do begin ar[i]:=random(-100,100); if (ar[i]>max) and not(odd(ar[i])) and (ar[i]>0) then begin max:=ar[i]; b:=true; end; if (ar[i]<min) and not(odd(ar[i])) and (ar[i]>0) then begin min:=ar[i]; b:=true; end; write(ar[i]:4); end; writeln; if b=false then writeln('Нет удовлетворяющих условиям чисел') else begin writeln('Max=',max); writeln('Min=',min); end; end.
Пример работы программы: Array: 98 60 -41 -88 63 -81 -77 -96 -18 51 Max=98 Min=60
1 Информационная безопасность — практика предотвращения несанкционированного доступа, использования, раскрытия, искажения, изменения, исследования, записи или уничтожения информации. Это универсальное понятие применяется вне зависимости от формы, которую могут принимать данные
Объяснение:
2 Сегодня более 60% пользователей Интернета – молодые люди в возрасте от 14 до 30 лет. По прогнозам экспертов, с внедрением в рамках национального проекта "Образование" Интернета в школы, этот процент возрастет в несколько раз, так как доступ к глобальной сети получат дети. В то же время глобальная сеть остается опасной, для детей и подростков средой. С одной стороны в свободном доступе находятся сайты с агрессивным и социально опасным содержанием. С другой, образовательные, социально-полезные, позитивные, ориентированные на молодежь ресурсы существуют в недостаточном количестве или не отвечают современным требованиям.
Необходимо обеспечить безопасность детей и молодежи при использовании сети Интернет с технических средств и отслеживания интернет-ресурсов негативного содержания. Помимо этого – нужно разработать комплексную программу создания и поддержки молодежных интернет-ресурсов позитивной направленности всестороннему развитию детей и молодежи, активному их вовлечению в социальную и общественную жизнь, воспитанию гражданской позиции и ответственности перед обществом.
3 Интернет-мошенничество — вид мошенничества с использованием Интернета. Оно может включать в себя сокрытие информации или предоставление неверной информации с целью вымогательства у жертв денег, имущества и наследства.
//Pascal ABC.NET 3.1 сборка 1256
Const
n=10;
Var
ar:array[1..n] of integer;
i,max,min:integer;
b:boolean;
begin
randomize;
b:=false;
max:=integer.MinValue;
min:=integer.MaxValue;
writeln('Array:');
for i:=1 to n do
begin
ar[i]:=random(-100,100);
if (ar[i]>max) and not(odd(ar[i])) and (ar[i]>0) then
begin
max:=ar[i];
b:=true;
end;
if (ar[i]<min) and not(odd(ar[i])) and (ar[i]>0) then
begin
min:=ar[i];
b:=true;
end;
write(ar[i]:4);
end;
writeln;
if b=false then writeln('Нет удовлетворяющих условиям чисел') else
begin
writeln('Max=',max);
writeln('Min=',min);
end;
end.
Пример работы программы:
Array:
98 60 -41 -88 63 -81 -77 -96 -18 51
Max=98
Min=60