Полагаю, вопрос оборван и полная формулировка звучит следующим образом: "Для узла с IP-адресом 203.155.196.98 адрес сети равен 203.155.192.0. Найдите наибольшее возможное количество единиц в двоичной записи маски подсети." Нас интересует 3-й октет (байт) IP адреса, который равен 196. Переведем в двоичную систему. Аналогично поступим с 3-м октетом адреса сети. IP адрес и маска подсети дают адрес сети, их поразрядное логическое умножение друг на друга. Для наглядности запишем это в столбик. 11000100 - IP хххххххх - маска 11000000 - адрес сети Однозначно, чтобы получить единицы в крайних левых разрядах адреса сети, они должны быть и в маске. 11000100 11хххххх 11000000 В задании требуется определить максимально возможное количество единиц в маске. Т.к. в маске подсети сначала идут все единицы, а потом все нули без чередования, маска будет следующей: 11000100 11111000 11000000 Будь единиц в маске хотя бы на одну больше, адрес сети бы изменился на 11000100. Теперь представим нашу маску в двоичном коде: 11111111.11111111.11111000.00000000 Число единиц 8+8+5=21. ответ: 21 единица.
ВАЖНО! Прикрепленные файлы на самом деле не текстовые, а двоичные, но таковые данная система не позволяет прикрепить. Поэтому не стоит пытаться эти файлы читать.
Для работы программы следует переименовать файлы в file1.bin и file2.bin
begin // считываем файл f1 в массив типа st1 var f1:file of st1; Assign(f1,'file1.bin'); Reset(f1); var n1:=FileSize(f1); var m1:=new st1[n1]; for var i:=0 to n1-1 do Read(f1,m1[i]); f1.Close; // читаем файл f2 и для каждой записи ищем элемент массива // с таким же номером. Если найден - делаем слияние в файл f3 var f2:file of st2; Assign(f2,'file2.bin'); Reset(f2); var buf2:st2; // буфер для чтения f2 var f3:file of st3; Assign(f3,'file3.bin'); Rewrite(f3); var buf3:st3; // буфер для записи f3 while not Eof(f2) do begin Read(f2,buf2); var j:=m1.FindIndex(t->t.номер=buf2.номер); if j<>-1 then begin buf3.номер:=buf2.номер; buf3.рост:=m1[j].рост; buf3.вес:=m1[j].вес; buf3.время_бега:=buf2.время_бега; buf3.кол_подтягиваний:=buf2.кол_подтягиваний; Write(f3,buf3) end end; f2.Close; // посмотрим, что получилось в f3 Seek(f3,0); while not Eof(f3) do begin Read(f3,buf3); Print(buf3) end; f3.Close end.
Пример работы программы (4611,164,64,287,4) (1102,162,63,312,3) (9195,183,71,220,12) (8914,178,62,229,9) (7696,163,67,252,7) (1922,174,77,245,5) (4204,164,60,273,6) (4586,173,68,241,10)
Число кратно 10 если оно заканчивается 0 В данном примере важна последняя цифра. Последняя цифра суммы чисел зависит только от суммы последних цифр. Последняя цифра произведения (Степени числа) зависит только от произведения (степени цифры) чисел 91^10=...1*...1*...*...1 (10 раз)=..1 --последняя цифра числа 1 42^10=..2*2*..*...2 (10 раз)=...4*...*...4(5 раз)=..6*..6*..4=...4 - последняя цифра 4 85^10=..5*..5*...*...5(10 раз)=...5 - последняя цифра 5 значит последняя цифра данного числа равна ..1+..4-...5=..0 -- последняя цифра 0, а значит оно кратно 10. Доказано
"Для узла с IP-адресом 203.155.196.98 адрес сети равен 203.155.192.0. Найдите наибольшее возможное количество единиц в двоичной записи маски подсети."
Нас интересует 3-й октет (байт) IP адреса, который равен 196. Переведем в двоичную систему.
Аналогично поступим с 3-м октетом адреса сети.
IP адрес и маска подсети дают адрес сети, их поразрядное логическое умножение друг на друга. Для наглядности запишем это в столбик.
11000100 - IP
хххххххх - маска
11000000 - адрес сети
Однозначно, чтобы получить единицы в крайних левых разрядах адреса сети, они должны быть и в маске.
11000100
11хххххх
11000000
В задании требуется определить максимально возможное количество единиц в маске. Т.к. в маске подсети сначала идут все единицы, а потом все нули без чередования, маска будет следующей:
11000100
11111000
11000000
Будь единиц в маске хотя бы на одну больше, адрес сети бы изменился на 11000100.
Теперь представим нашу маску в двоичном коде:
11111111.11111111.11111000.00000000
Число единиц 8+8+5=21.
ответ: 21 единица.