Интернеттің зияны мен пайдасы» тақырыбында эссе жазыңыздар.​

Ғаламтор - қазіргі қоғамның ажырамас бөлігіне айналған дүние. Тіпті, кейбіріміз ғаламторсыз өмір сүре алмайтын деңгейге жеттік. Ғаламтордың жылдамдығы нашарлап қалса болды, - ашуға беріліп шыға келеміз. Бұлай ашулануға негіз бар ма әлде жоқ па? Соны анықтап алайық.

Ғаламтордың пайдалы жақтары

Ғаламтор - ғылым мен техниканың шынайы жетістігі. Ол - сөзсіз. Интернетті қолдана алатын кез келген адам өзіне қалаған ақпарат мен мағлұматты тауып, қажетіне жарата алады. Мазалап жүрген сауалдарының жауабын табады. Әлемдік жаңалықтар мен оқиғалардан хабардар болып отыруға көмектеспек. Бұл жағынан интернет адамның білімі мен қабілетін, тұлғалық қасиеттерін дамытуға ықпал етеді.

Ғаламторда шек жоқ. Алыста жүрген ата-анаңмен де, туған-туыстарыңмен де емін-еркін байланыс ұстайсың, сөйлесесіз, хабарласасың. Тіпті, адамдардың қолы жетпейтін жерге осы ғаламтордың қолы тиіп тұр. Көрісе алмаған адамыңмен ғаламтор арқылы байланыс орнатасың. Ғашығын да ғаламтордан тауып жатқандар қаншама.

Ғаламдық желі, сөзсіз, адамның білімін жетілдіруге көмектесетін құрал. Соның арқасында шет тілін үйреніп, түрлі курстар мен тренингтерге қатысуға болады. Одан бөлек, ғаламтор - нағыз табыс көзіне айналып отырған сала. Онымен табыс тауып отырғандар да аз емес.

Ғаламтордың зияны

Өкінішке орай, жоғарыда айтылған ғаламтордың артықшылықтарына қарамастан, оның зиян жақтары да көп болып шықты. Ғаламторға деген тәуелділік қазір ғаламдық мәселеге айналып бара жатыр. Соның кесірінен адамдар арасындағы күнделікті байланыс бұзылып барады. Адамдар бір-бірімен сөйлесуді, әңгімелесуді, сырын бөлісуді ұмытып бара жатқандай. Жылы шырай танытып, шүлдірлеп сөйлесуден, жанды, табиғи қатынастан қалып барамыз.

Ғаламтордың келесі зиянды тұсы - адамның денсаулығы. Компьютер алдында ұзақ отырған адамның денсаулығы да нашарлай түседі. Өйткені ол қозғалыстан қалып, оның соңы бел, арқа, көз ауруларына әкелуі мүмкін.

Одан бөлек, қазіргі таңда ғаламторда алаяқтар да көбейді. Олардан сақтанудың да қамын жасаған абзал.

Судя по всему, здесь в цикле складываются квадраты всех нечетных чисел от m до n включительно.

m & 1 - это битовая конъюнкция. Результатом будет 1, если m нечетное, и 0, если m - четное (то есть, содержит или не содержит соответствующий разряд)

Выражение вида T ? X : Y, где T - логическое высказывание, принимает значение X, если T истинно, и Y, если T ложно.

Соответственно, i = (m & 1) == 1 ? m : m + 1 означает, что
если m нечетное, то i = m
если четное, i = m+1 (то есть, первое нечетное число после m)

i += 2 означает, что цикл идет с шагом, соответственно, рассматриваются только нечетные числа.

Const
 n = 20;

var
 pos,neg: integer;
 i,k,x: integer;
 ev,un: integer;
 a,b: array [1..n] of integer;

begin
 for i := 1 to n do
   read(a[i]);
  k := 0;
 pos := 0;
 neg := 0;
  for i := 1 to n do
   begin
      ev := 0;
   un := 0;
      x := a[i];
      if x <> 0 then
     if x > 0 then
       if (x < pos) or (pos = 0) then
         pos := x
       else
     else
       if (x > neg) or (neg = 0) then
         neg := x;
      x := abs(x);
      while x <> 0 do
     begin
     if odd(x) then
       un := un + 1
     else
       ev := ev + 1;
     x := x div 10
     end;
      if un = ev then
     begin
     k := k + 1;
     b[k] := a[i]
     end
      end;

 writeln(pos,' ',neg);
 for i := 1 to k do
   write(b[i],' ')
 end.