Program abc;Const n=3; m=3;Var a:array[1..n,1..m] of integer; b,y,i,j,sum:integer; srd:real; Begin Writeln('Введите числа массива: '); For i:=1 to n do For j:=1 to m do Begin Write('a[',i,',',j,']= '); Readln(a[i,j]); if a[i,j]>0 then begin sum:=sum+a[i,j]; inc(b); end else If a[i,j]<0 then Inc(y); End; If sum>0 then begin srd:=sum/1 b; Writeln('Среднее =',srd); end else Writeln('Нет положительных членов массива'); If y>0 then begin Writeln('Количество отрицательных элементов =',y); end else Writeln('Нет отрицательных членов массива');End.
Для начала: TCP и IP протоколы разных уровней модели OSI IP - транспортный протокол, TCP - Сетевой IP - протокол предназначен для обмена данными между сетями и содержит в себе информации о сетевом протоколе, точнее его тип. А зная тип можно потом извлечь информацию из полученных данных. TCP - даёт уверенность в безошибочности получаемых данных, перезапрашивающий данные в случае потери и устраняющий дублирование данных. TCP позволяет регулировать нагрузку на сеть, а также уменьшать время ожидания данных при передаче на большие расстояния. Более того, TCP гарантирует, что полученные данные были отправлены точно в такой же последовательности.
id - integer (счетчик, ключ)
название тура - varchar
список стран - varchar
стоимость - float
ВИДЕОТЕКА
id - integer (счетчик, ключ)
название фильма - varchar
оргинальное название - varchar
год выпуска - integer
стоимость - float
АВТОСАЛОН
id - integer (счетчик, ключ)
марка машины - varchar
производитель - varchar
цвет - varchar
год выпуска - integer
стоимость - float
РЕГИОНЫ
id - integer (счетчик, ключ)
название - varchar
главный город - varchar
диапазон индексов - varchar