Изучить п.3.5.4 и выполните №13(а) стр.143 тремя с оператора цикла While, затем с оператора Repeat, затем с цикла For
напишите программу которая вычесляет сумму
А) первых n натуральных чисел

//Задание №1
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
const m = 31;
var a:array[1..m] of integer;
i,s,n:integer;

begin
  for i:=1 to m do begin
    a[i]:=random(-20,20);
    if a[i]>0 then begin
      s:=s+a[i];n:=n+1;
    end;
  end;
  println('Температуры за месяц :'); a.println;
 writeln('Средняя в оттепель :',s/n:0:3);
end.

Тестовое решение:
Температуры за месяц :
16 7 19 -7 -18 6 12 -18 -5 -10 8 -4 10 4 10 5 -3 14 -7 -8 2 7 4 -7 18 4 -12 -5 -9 7 -5
Средняя в оттепель :9.000

//Задание №2
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
const m = 10;
var a:array[1..m] of integer;
i,s,n:integer;

begin
  for i:=1 to m do begin
    a[i]:=random(-20,20);
    if i mod 2<>0 then s:=s+a[i];
  end;
  writeln('Исходный массив :'); a.println;
  for i:=1 to m do
    if i mod 2=0 then a[i]:=s;
  writeln('Сумма на нечетных местах  = ',s);
  writeln('Изиененный массив :'); a.println;
end.

Тестовое решение:
Исходный массив :
-6 15 5 -11 18 4 17 -9 -15 -16
Сумма на нечетных местах = 19
Изиененный массив :
-6 19 5 19 18 19 17 19 -15 19

Еще несколько лет назад мы даже не представляли, что компьютеры смогут играть в шахматы не хуже гроссмейстеров. Что информация будет храниться не на локальных компьютерах, а в «облаке»… Мы, безусловно, живем в эпоху «информационной революции»: объемы данных растут небывалыми темпами, порождая необходимость в постоянном развитии технологий.

Чтобы идти ногу со временем, учебные заведения по всему миру вводят новые специальности. Представляем 5 уникальных профессий будущего, связанных с обработкой данных и искусственным интеллектом.

1. Специалист по обработке Big Data



Термином Big Data принято описывать большие массивы разнообразной информации со сложной, неоднородной или вообще неопределённой структурой. Эта информация может быть структурирована или не структурирована, но специалист по работе с Big Data обязан уметь работать с ней и приводить к удобному для восприятия виду. Сама же наука о данных (Data Science) лежит на стыке математики, статистики, информатики, бизнеса и экономики. Соответственно, хороший специалист должен иметь знания во всех этих сферах. Рынок Big Data сейчас только начинает формироваться и в скором будущем может стать одним из основных в сфере IT.

2. Специалист по разработке нейронных сетей

Нейронные сети сегодня проникают не только всё глубже в IT и бизнес, но и в нашу повседневную жизнь. Они обрабатывают фотографии и видео в приложениях, ищут людей в соцсетях по фотографии, играют в го и даже имитируют рукописный текст. Но это лишь верхушка айсберга, то, что мы используем в быту. Настоящие серьёзные нейронные сети решают сложные задачи в экономике, статистике, химических и биологических исследованиях. Разработка и обучение нейронных сетей — важная часть нашего будущего и первый шаг на пути к созданию полноценного искусственного интеллекта.