Локальные сети-это сети,доступные определённому кругу лиц,это может быть несколько компьютеров в одном помещении соединённых частной сетью или кабелем,пользователи которых могут обмениваться друг с другом файлами,информацией.Локальные сети часто используют в офисах где все ПК соединены друг с другом,для того чтобы меняться документами и т.д.При этом файлы доступны только пользователям лок.сети. Глобальная сеть или интернет-это сеть в которой обьеденены Пк со всего мира.С глоб.сети люди обмениваются информацией,файлами и т.д.Только в отличие от локальной сети они доступны всем.у каждого компьютера,привязанного к глоб.сети есть свой id.Он у каждого ПК разный,что позволяет выделить его среди других.В отличие от локальной.сети,глоб.сеть используют везде в кафе,магазинах и т.д.Локальная сеть полезна в определённом кругу лиц,для частного пользования,а интернетом пользуются все.
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018 Внимание! Если программа не работает, обновите версию!
begin var a:=ReadArrInteger(30); Writeln('1. Количество четных ',a.Where(t->t.IsEven).Count); var s:=a.Where(t->(t mod 3=0) and (t mod 9<>0) and t.Between(10,99)); Write('2. Мудреное среднее арифметическое '); if s.Count=0 then Writeln(-1) else Writeln(s.Average); Write('3. Наибольшая длина цепочки четных элементов '); var (l,l1):=(-1,0); foreach var t in a do if t.IsEven then l1+=1 else begin l:=Max(l,l1); l1:=0 end; Writeln(l); var k:=ReadInteger('4. Номер удаляемого элемента (1-30):')-1; Writeln('Массив после удаления элемента'); a:=a?[:k]+a?[k+1:]; a.Println; Write('5. Второй максимум '); a.OrderByDescending(t->t).Skip(1).Take(1).Println end.
b=8бит=1байт
K=v/b=512000/1=512000 символов в тексте