М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
alenaafaunova
alenaafaunova
30.07.2022 20:52 •  Информатика

Частная виртуальная сеть – это... сеть, которая подключает несколько компьютеров через единую точку доступа

система, в которой можно обмениваться данными между вычислительными устройствами

топологическая локальная компьютерная сеть, которая не зависит от физической топологии

сетевое соединение поверх другой сети​

👇
Ответ:
yroyakap0doki
yroyakap0doki
30.07.2022

виртуальная частная сеть») — обобщённое название технологий, позволяющих обеспечить одно или несколько сетевых соединений (логическую сеть) поверх другой сети (например Интернет).

4,6(14 оценок)
Открыть все ответы
Ответ:
mihailodnowal777
mihailodnowal777
30.07.2022

javascript:

function Вычислить(число) {  

var массив = [], м1 = [], м2 = [], с1 = 0, с2 = 0;  

for (let сч = 1; сч <= число; сч++) массив.push(сч);  

for (let сч = число - 1; сч >= 0; сч--)  

 if (с1 > с2) { м2.push(массив[сч]); с2 += массив[сч]; }  

 else { м1.push(массив[сч]); с1 += массив[сч]; }  

if (с1 != с2) return false;  

else {  

 var рез = "";  

 for (let сч = 1; сч <= число; сч++)  

  if (м1.indexOf(сч) != -1) рез += "+"; else рез += "-";  

 return рез;  

}

}

document.write(Вычислить(8) + "<br />");

document.write(Вычислить(15) + "<br />");

document.write(Вычислить(40) + "<br />");

document.write(Вычислить(99) + "<br />");


+--++--+

--++--++--++--+

+--++--++--++--++--++--++--++--++--++--+

--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--++--+

4,4(46 оценок)
Ответ:
лёша2002z
лёша2002z
30.07.2022
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadAllLines('Pushkin.txt');
  Writeln('*** Текст в файле ***',NewLine);
  a.Println(NewLine);
  var n:=a.Select(s->s.ToWords.Count).Where(k->k>0).Min;
  a:=ReadLines('Pushkin.txt').Where(s->s.ToWords.Count=n).ToArray;
  WriteLines('Result.txt',a);
  Writeln(NewLine,'*** Новый файл ***',NewLine);
  ReadLines('Result.txt').Println(NewLine)
end.

Пример:

*** Текст в файле ***

Если жизнь тебя обманет,
Не печалься, не сердись!
В день уныния смирись:
День веселья, верь, настанет.

Сердце в будущем живет;
Настоящее уныло:
Всё мгновенно, всё пройдет;
Что пройдет, то будет мило.
   (А.С. Пушкин, 1825)

*** Новый файл ***

Настоящее уныло:
4,7(2 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ