Понятие коммуникации имеет много различных определений. Коммуникация - это «передача информации, идей, оценок или эмоций от одного человека (или группы) к другому (или другим) главным образом посредством символов» (Theodorson). «Под коммуникацией в широком смысле понимаются и система, в которой осуществляется взаимодействие, и процесс взаимодействия, и общения, позволяющие создавать, передавать и принимать разнообразную информацию» . (Ф. И. Шарков) . «Коммуникация - социально обусловленный процесс передачи и восприятия информации в условиях межличностного и массового общения по разным каналам при различных коммуникативных средств (вербальных, невербальных и других) » (В. П. Конецкая) . «Под коммуникацией мы будем понимать процессы перекодировки вербальной в невербальную и невербальной в вербальную сферы. Исторически коммуникацией было именно это: принуждение другого к выполнению того или иного действия. То есть для коммуникации существенен переход от говорения Одного к действиям Другого» (Г. Г. Почепцов) .
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 uses crt; const n=10; var a:array[1..n] of integer; i,k,k0:integer; s:real; begin clrscr; writeln('Массив :'); for i:=1 to n do begin write(i,' = '); read(a[i]); end; k:=1; for i:=1 to n do if a[i]<0 then begin s:=s+a[i]; inc(k); end else begin if a[i]>0 then inc(k0); end; s:=s/k; writeln; if (k=1) and (k0=0) then writeln('Положительных или отрицательных элементов в массиве нет,среднее ариф-ское = 0') else writeln('Среднее ариф-ского отрицательных элементов массива =',s:0:2); readkey; end.