Дано : равномерный массив а[n] найти количество отрицательных элементов массива

Const   n=16; var   x: array[1..n] of integer;   i,k: integer; begin   randomize;   writeln('элементы массива');   k: =0;   for i: =1 to n do   begin       x[i]: =random(51)-25;       write(x[i]: 4);       if x[i]< 0 then inc(k)   end;   writeln;   writeln('количество отрицательных элементов равно ',k); end. тестовое решение: элементы массива     3 -14  -7  15  10  12 -11 -13 -21 -13  13 -17    9  -7 -24  20 количество отрицательных элементов равно 9

J: =0; for i: =1 to n do   if a[i]< o then j: =j+1; writeln (j);   end.

технические характеристики это:

длина самолета размах крыла общее число мест бизнесс-класс (места) эконом-класс (места) крейсерская скорость максимальная высота полёта

дальность полета

 

инфомодель -  это модель данных, это схема, описывающая информацию

1) 24+18+12=54 (ч.) 2) 54-35=19 (ч.) не любят не один вид спорта. 3) 10+8+5=23 (ч.) - любят 2 или больше видов спорта. 4) 23-19=4 (ч.) - любят все три вида спорта.

ответ: 4 человека любят три вида спорта.