Самый простой вариант - подсчитать сумму четных и нечётных через цикл, в котором берём остатки от деления. Можно начать с конца и соответственно начать подсчитывать сумму только от первого числа с конца не равного 0. Подсчитываем через целочисленное деление на круглое число и нахождение остатка при деление на один. Данные, чередуя, прибавляем к разным переменным(пусть будут x1 и x2). Затем проверяем остаток от деления одной переменной на другую. Если 0 - "Yes", иначе - "No" For i=5 downto 1 do If i Mod 2 = 1 then a:= a+n div (10^(i-1)) mod 10 Else B=B+ div (10^(i-1)) mod 10;
IP 214.120.249. 18
маска 255.255.240. 0
cеть 214. 120. х. 0
240=128+64+32+16=1111 0000 (2сс)
249=240+8+1 = 1111 1001 (2сс)
1111 0000 - побитовая конъюнкция =240
x=240
ответ 214.120.240.0
2)
IP 114 = 64+ 32+ 16+2=0111 0010
сеть 96=64+32 = 0110 0000
маска= 1110 0000 =128+64+32= 224
ответ 224
3)
156. 32.149.138 IP
156. 32.128. 0 сеть
255.255. х . 0
149=128+16+4+1=1001 0101
128= 1000 0000
max маска 1110 0000=224 (3 единицы)
маска 255.255.224.0 (в 255=1111 1111 - 8 единиц)
8+8+3=19 единиц