P.txt с
4) В терминологии сетей TCP/P маской сети называют двоичное число, которое
тера равен
показывает, какая часть IP-адреса узла сети относится к адресу сети, а какая - к
адресу узла в этой сети. Адрес сети получается в результате применения
поразрядной конъюнкции к заданному адресу узла и его маске. По заданным IP-
адресу узла сети и маске определите адрес сети:
IP-адрес: 240.37.249.134 Маска: 255.255.240.0
При записи ответа выберите из приведенных в таблице чисел 4 фрагмента
четыре элемента IP-адреса и запишите в нужном порядке соответствующие им
буквы без точек.
A
B
с
D
E
F
G Н
255 249 240 224 37 32 8
0
Найдем объем всего сообщения в битах:
1/512 Мб=1024/512 Кб=2 Кб=2*1024 байт=2048 байт=2048*8 бит
Найдем сколько занимает один символ для этого поделим кол-во битов в сообщении на кол-во символов:
(2048*8)/2048=8 бит i=8
найдем мощность алфавита N
N=2 в стапени i
N=256
ответ: N=256
№2
Найдем сколько занимает один знак:
N=2 в степени i
256=2 в степени i
i=8 бит
Найдем сколько займут введенные символы:
8*100=800 бит=800/8 байт=100 байт
ответ: 100 байт
№3
Найдем сколько занимает один символ:
N=2 в степени i
65536=2 в степени i
i=16 бит=2 байта
Найдем кол-во символов:
4стр*5мин=20стр
20стр*40строк=800строк
800строк*50 симв=40000симв
Все символы занимают:
40000*2 байта=80000байт
ответ: 80000байт
Объяснение:
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Количество строк/столбцов в матрице:');
Writeln('*** Исходная матрица ***');
var a:=MatrRandom(n,n,1,50);
a.Println(3); Writeln(3*a.ColCount*'-');
// начало расчетов
var s:=0;
for var i:=0 to n-1 do s+=a[i,n-i-1];
Writeln('1: S=',s);
Write('2: Суммы построчно: '); a.Rows.Select(row->row.Sum).PrintLn;
Write('3: Произведение элементов: ');
a.ElementsByRow.Aggregate(BigInteger(1),(p,q)->p*q).PrintLn;
var p:BigInteger:=1;
for var i:=0 to n-1 do p*=a[i,i];
Writeln('4: П=',p);
end.