1. перечислите основные факторы, повлиявшие на возникновение интегрированных вычислительных сетей?

итак,  интернета можно разделить на несколько этапов.

1961 – 1970 гᴦ. разработаны технические принципы компьютерной сети, введен в действие arpanet.

1971 – 1980 гᴦ. придуман знак @. написана первая программа для элек­тронной почты. осуществлена первая международная связь по электронной почте между и норвегией. число узлов arpanet возросло до не­скольких десятков, проложены специальные кабельные линии, соединяющие некоторые узлы, начинает функционировать электронная почта͵ о результа­тах работ ученые докладывают на международных научных конференциях.

1981 – 1990 гᴦ. принят протокол tcp/ ip, введена система доменных имен domain name system (dns).

сформирована сеть интернет.

1991–2000 гᴦ. ethernet стал самой распространенной технологией ло­кальной компьютерной сети. интернет объединил локальные сети и стал сред­ством массовой коммуникации. прои­зошло сращивание сотовой связи и интернета. телетехнологии встроены в сеть – телемосты, ви­деоконференции. услуга интернет и электронной почты встроена в мо­бильные телефоны.

var c: char; s: string; i,k,p: integer; begin readln(c); {чтение заданного символа} readln(s); {чтение заданного слова} p: = pos(c,s); {определяем позицию символа} if (p=0) then {функция вернёт 0, если символ не будет найден} writeln('такого символа в слове нет.') else {если символ есть, то } begin writeln('указанный символ расположен на позиции: ',p); k: = 0; {k хранит количество вхождений} p: = length(s); {p хранит длину строки(слова)} for i: =1 to p do {пробегаем по всем символам слова} if (s[i]=c) then inc(k); {если символ совпадает, увеличиваем на 1 переменную k} writeln('количество вхождений данного символа: ',k); end; end.

var

a,b,c: real;

begin

readln(a,b,c);

writeln((a+b+c)/3);

end.