Втерминологии сетей tcp/ip маской сети называют двоичное число, которое показывает, какая часть ip-адреса узла сети относится к адресу сети, а какая – к адресу узла в этой сети. адрес сети получается в результате применения поразрядной конъюнкции к заданному адресу сети и его маске. по заданным ip-адресу сети и маске определите адрес сети: ip-адрес: 145,92,137,88 маска: 255.255.240,0

👇

Ответ:

умно55567

25.08.2020

Маска 255.255.240.0 показывает, что под адрес сети отдаются два полных октета и часть третьего.
240(10)=1111 0000 (2) - это показывает, что граница между адресом сети и адресом подсети лежит посередине третьего октета, т.е. адрес рподсеть может адресоваться тремя шестнадцитиричными цифрами и иметь 256*16=4096 адресов.
В данном случае IP-адрес 149.92.138.88 указывает на сеть 149.92.80.0 и узел подсети 9.88
Как получились эти цифры? 138(10)=1000 1001(2). Легко видеть, что старшие 4 бита, вырезаемые маской 1111 0000 дают число 8, а младшие - число 9.

4,8(12 оценок)

Открыть все ответы

Ответ:

hlagga

25.08.2020

Const
n=100;
type
V=array[1..n] of integer;

procedure IsGreater(var p:V; m,T:integer; var r:boolean);
var
i:integer;
begin
i:=1; r:=True;
while (i<=n) and r do
begin r:=(p[i]>T); Inc(i) end
end;

procedure Init(var p:V; m:integer);
{ инициализация и вывод массива }
var
i:integer;
begin
for i := 1 to m do
begin p[i]:=Random(51)-25; Write(p[i]:4) end;
Writeln
end;

procedure Invert(var p:V; m:integer);
{ инвертирование элементов и вывод массива }
var
i:integer;
begin
Writeln('Текущие значения элементов массива');
for i := 1 to m do
begin p[i]:=-p[i]; Write(p[i]:4) end;
Writeln
end;

var
a,b:V;
i,m1,m2,t:integer;
res:boolean;
begin
Randomize;
Write('Введите размеры массивов a и b: '); Read(m1,m2);
Writeln('Введите пороговое значение T: '); Read(t);
Writeln('Элементы массива A');
Init(a,m1);
IsGreater(a,m1,t,res);
if res then Invert(a,m1)
else Writeln('Условие не выполнено');
Writeln('Элементы массива B');
Init(b,m2);
IsGreater(b,m2,t,res);
if res then Invert(b,m2)
else Writeln('Условие не выполнено')
end.

Тестовое решение:
Введите размеры массивов a и b: 15 9
Введите пороговое значение T:
-24
Элементы массива A
23 -9 -23 -25 -25 -4 -16 -2 -3   6 -8 -19 19 21 12
Условие не выполнено
Элементы массива B
-6 -9 -3 -23 14   4 -11 24 11
Текущие значения элементов массива
   6   9   3 23 -14 -4 11 -24 -11

4,4(73 оценок)

Ответ:

lobodapo

25.08.2020

Const
n = 10;
var
x:array[1..n, 1..n] of integer;
i,j,i1,i2,xmax:integer;
begin
Randomize;
Write('Введите через пробел номера строк матрицы для поиска: ');
Read(i1,i2);
Writeln('Исходная матрица');
for i:=1 to n do
begin
    for j:=1 to n do
    begin
      x[i,j]:=Random(101)-50;
      Write(x[i,j]:4)
    end;
    Writeln
end;
xmax:=x[i1,1];
for i:=i1 to i2 do
    for j:=1 to n do
      if xmax<x[i,j] then xmax:=x[i,j];
Writeln('Максимальный элемент в указанном диапазоне: ', xmax);
end.

Тестовое решение:
Введите через пробел номера строк матрицы для поиска: 4 6
Исходная матрица
13   2 30 10 -5 42 45 41 13 17
-10 37 47 16 -37 -41 11 -37 -1 -48
-26 -9 -15   5 -31 -36 44 30   4 -20
-34   9 34 43 22 -36 35   1 33 11
-14 22 16 -42 15   4 48 -6 -18 45
-25   1 41 26 -39 -29 -34 -25 -10 -19
48 -35 -13 -18   1 32 -48 -47 45 49
-25 -40 -19 39 16   3 26 -23 41 16
-34   0 -3   9 -45 15 18 -42 32   0
48 10 -40   1 13 -29 -15 -17   7 34
Максимальный элемент в указанном диапазоне: 48

4,7(45 оценок)

Это интересно:

Кулинария-и-гостеприимство

05.10.2021

Как правильно жарить курицу: секреты и рекомендации...

Компьютеры-и-электроника

01.08.2022

Как сохранить фото на Macbook: простые способы...

Питомцы-и-животные

09.08.2021

Как приготовить угощения для лошади: рецепты и советы...

Компьютеры-и-электроника