Интернет – это очень полезная вещь, но с другой стороны - слишком вредная. Полезность его заключается в том, что можно найти, практически, любую интересующую вас информацию и можно общаться в социальных сетях с людьми на больших расстояниях. А вред интернета заключается, в первую очередь, в зависимости от него, которая превращается в болезнь.
Хоть и плюсов много, но минусов больше, например, таких как: лжесайты, на которых распространяют компьютерные вирусы, снимают большие суммы денег с мобильного телефона, если, например, ты ввел номер своего мобильного телефона для обычной регистрации, а попался к мошенникам; реклама на сайтах, с которых тебе нужна информация для работы или учебы, а перед глазами все время выскакивает и мелькает бесконечная «гадость» и к тому же, с этих реклам так же распространяют вирусы.
В интернете много всего нецензурного, порнографии и мошенничества. В первую очередь, от всего вышеперечисленного нужно уберегать детей, устанавливая на компьютеры фильтры безопасности и хорошие антивирусы. Для наилучшей защиты правительству нужно создавать различные организации, занимающиеся охраной интернета и которые обезопасить информационное пространство интернета, тем самым защитить детей и их детство.
===== PascalABC.NET =====
begin
var a := ArrRandom(25, -19, 169);
a.Println;
var s := a.Select((v,i) -> (v, i));
var ineg := s.Where(p -> p[0] < 0).Select(p -> p[1]).ToArray;
var ipos := s.Where(p -> p[0] > 0).Select(p -> p[1]).ToArray;
for var i := 0 to Min(ineg.Length, ipos.Length) - 1 do
Swap(a[ineg[i]], a[ipos[i]]);
a.Println
end.