ответ:
"безопасность в интернете"
объяснение:
от социальных сетей - к онлайн-банкинга сегодня интернет проник в нашу жизнь и деятельность. кроме компьютеров и ноутбуков, мы подключаем к интернету все - мобильные телефоны, планшеты, холодильники, телевизоры и много других портативных устройств. именно поэтому важно знать как можно больше о безопасности во всемирной сети.
необходимо найти правильные способы защиты нашей частной жизни, когда мы находимся онлайн.
многие думают, что безопасность в интернете - это иллюзия, и быть защищенным сейчас невозможно, ведь сайты собирают конфиденциальную информацию так тонко, что мы даже не знаем, что именно им известно. это, возможно, и так, но эта неуверенность - еще одна причина, чтобы сохранить свою приватность и избежать утечки персональных данных в интернет.
есть ли что-то, что мы можем сделать, чтобы быть более защищенным когда занимаемся серфингом в инете, кроме того, не показывать свои пароли, или не предоставлять много личной информации?
1)
var a:array [1..100] of integer;
n,i:integer;
begin
for i:=10 to 99 do begin
a[i]:=i;
if (a[i] mod n=0) then writeln(a[i]);
end;
end.
2)
var a:array [1..100] of integer;
n,k,i,x,y,z: integer;
begin
readln(n,k);
for i:=n to k do begin
a[i]:=i;
x:=a[i] mod 10;
y:=a[i] div 10;
z:=y mod 10;
y:=y div 10;
if (x=y) or (x=z) or (y=z) then writeln(a[i]);
end;
end.
3)
var a,n,an,na: integer;
begin
readln(a,n);
if (a>0) and (b>0) then begin
an:=a*10+n;
na:=n*10+a else writeln('Введены неверные числа!');
end;
end.