Дайте відповіді на запитання 1. Що таке Інтернет речей? Із чого він складається?2". Які базові принципи функціонування Інтернету речей?3. Які ви можете навести приклади використання розумних речей? Поясніть їхфункціонування.4. Які розумні речі є у вас, ваших однолітків, рідних? Для чого вони їх використо-вують?У чому сенс питання інтернет-безпеки під час використання розумних пристроїв?е". Що розуміють під Smart тexнологіями? Чи використовують іх у вашійшколі?7. Яке значення має інтернет речей у житті людей?​

// PascalABC.NET 3.1, сборка 1213 от 04.04.2016
begin
  var m,n:integer;
  Write('Ввведите число строк и столбцов: ');
  Read(m,n);
  var a:=MatrixRandom(m,n,-99,99);
  var Vrow:=ArrFill(m,0);
  var Vcol:=ArrFill(n,0.0);
  for var i:=0 to m-1 do begin
    var max:=-100;
    for var j:=0 to n-1 do begin
      Write(a[i,j]:4);
      if a[i,j]>max then max:=a[i,j]
      end;
    Writeln;
    Vrow[i]:=Max
    end;
  Writeln('Вектор из наибольших значений строк');
  Vrow.Println;
  for var j:=0 to n-1 do begin
    var s:=a[0,j];
    for var i:=1 to m-1 do s+=a[i,j];
    Vcol[j]:=s/m
    end;
  Writeln('Вектор из средних арифметических по столбцам');
  Vcol.Println
end.

Тестовое решение:
Ввведите число строк и столбцов: 5 8
 -82  67 -78  27  69 -80  85  34
  70 -82 -89 -30 -57  31  14  33
  -4  -1 -93 -21  81 -66  48  31
  58  18 -40 -63 -68  40  46 -44
  85  46  31 -61   1  43   2 -94
Вектор из наибольших значений строк
85 70 81 58 85
Вектор из средних арифметических по столбцам
25.4 9.6 -53.8 -29.6 5.2 -6.4 39 -8