Работа «суб)» в-8
1. в субд сравниваются символьные величины по внутренним . используя это правило,
уст1/10 вите отношение между записямн на языке: athlete ? а
(стадії» между энмн записями проrіущенный знак отношений > < > : < -- --
2. уikaките сколько и какие поля будут числовыми в данной таблице:
дата
имя разряд
названне зарплата
рождення предмета
си; урова мария 12 15.05.1950 . 1р
симонов иван 11 14.07.1965 биология 7000р
петренко василий ті 23.04.1972 7000р
петренко виктор | 23.04.1972 астрономия 7000р
васиљев владимир 9 01.01.1982 физкультура 8000р.
3. укажите сколько записей в таблице из № 2.
4. укажите в таблице из № 2, какое поле является ключевым и почему?
5. какие записи в таблице из № 2 удовлетворяют запросу: разряд»: -11 и фамилия > п
6). кајкие записи в таблице из № 2 удовлетворятот запросу: фамилия-с* и зарплата = не
7000 р .
7. какой нз двух запросов является сложным? объясните свой выбор.
1) фамилия - fa
2) разря». 1);
8. таблица б24 содержит поля: код работника, фамилия, имя, фото, должность, зарплата. дата
прном: на работу. определить тип каждого поля.​

// PascalABC.NET 3.0, сборка 1156 от 30.01.2016
function Avg(a:array[,] of integer):real;
begin
  var s:=0; var k:=0;
  foreach var e:integer in a do
    if e>0 then begin s+=e; Inc(k) end;
  if k>0 then Result:=s/k else Result:=1e-100;
end;

begin
  var A:=MatrixRandom(4,4,-50,50); Writeln(A);
  Writeln('Среднее арифметическое положительных равно ',Avg(A):0:3);
  var B:=MatrixRandom(5,5,-30,30); Writeln(B);
  Writeln('Среднее арифметическое положительных равно ',Avg(B):0:3);
  var C:=MatrixRandom(4,5,-25,38); Writeln(C);
  Writeln('Среднее арифметическое положительных равно ',Avg(C):0:3);
end.

Тестовое решение:
[[35,35,5,-47],[14,34,35,-13],[25,-5,35,-29],[-7,10,-12,12]]
Среднее арифметическое положительных равно 24.000
[[-12,-17,-10,19,14],[20,17,-27,-2,16],[-3,-21,30,2,10],[5,-3,-17,-3,18],[0,-26,29,1,-22]]
Среднее арифметическое положительных равно 15.083
[[-5,-11,17,-4,15],[15,17,-24,36,15],[-8,-3,-22,28,-25],[-21,6,12,31,-1]]
Среднее арифметическое положительных равно 19.200

#include <iostream>#include <array>#include <algorithm>#include <functional>template <std::size_t size>int count(std::array<int, size> const& arr_, std::function<bool(int)> const& f){    return std::count_if(arr_.begin(), arr_.end(), f);}int main(){    std::array<int, 5> arr = { -2, 0, 5, 0, -1 };    int positive = count(arr, [](int a){ return a > 0; });    int negative = count(arr, [](int a){ return a < 0; });    int zero = count(arr, [](int a){ return a == 0; });    std::cout << positive << " " << negative << " " << zero;}