первое задание: 1. Необходимо следить за адресами, на которые ведут ссылки. Для того чтобы узнать адрес, на который ведет ссылка необходимо просто навести на нее курсор. Если вам предлагают перейти на сайт Х, а ссылка ведет на сайт Y то тут что-то не так. Возможно, вас пытаются обмануть.
2. Перед вводом личной информации проверяйте адресную строку браузера. Если вы там увидите что то вроде vkontokte.ru вместо привычного vkontakte.ru, то можете быть уверены, что вы находитесь на поддельном сайте и у вас пытаются украсть пароль для доступа к вашему аккаунту. После получения данных злоумышленники могут использовать аккаунт для рассылки спама и вирусов вашим друзьям.
3. Не переходите по незнакомым ссылкам, которые приходят вам на почту, в «аську», или в социальные сети. Даже если ссылка пришла от знакомого человека необходимо быть максимально внимательным. Вполне возможно аккаунт вашего знакомого уже взломан, и теперь от его имени рассылают вирусы.
4. Не скачивайте неизвестные файлы, пришедшие вам на почту или в «аську», даже если файл пришел от вашего знакомого. Перед тем как скачивать такие файлы уточните у отправителя, что это за файл.
5. Современные поисковые системы и браузеры умеют предупреждать пользователя, когда он пытается зайти на сайт распространяющий вирусы. Необходимо внимательно относиться к таким предупреждениям, скорее всего сайт, который вы пытаетесь посетить, заражен.
2 задание 1 Длина пароля. Пароль должен содержать не менее 8 символов, а лучше – 10 и более.
2 Наличие цифр и букв верхнего и нижнего регистров, идущих не подряд – .
3 Наличие специальных знаков – «@», «$», «&» и т.д. (если допустимо их присутствие).
пример [email protected]
Объяснение:
const
n=5;
var
i,j,maxi,maxj:integer;
a:array [1..n,1..n] of integer;
b:array of integer;
begin
maxi:=1; maxj:=1;
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(101)-50;
write(a[i,j]:4);
if a[i,j]>a[maxi,maxj] then
begin
maxi:=i;
maxj:=j;
end;
end;
writeln;
end;
writeln;
writeln('Строка: ', maxi);
j:=1; i:=1;
repeat
if a[maxi,j] >0 then
begin
setlength(b,i);
b[i-1]:=a[maxi,j];
inc(i);
end;
inc(j);
until j>n;
for j:=0 to length(b)-1 do
write(b[j]:4);
b:=nil;
end.