Ответ:
32 маршрута можно закодировать 3-ех значным двоичным числом т.к. 32 это 2^3.
значит 3 бит.
var a,b,i,nda,ndb:integer;
begin
readln(a,b);
nda := 0;
ndb := 0;
for i := 1 to a do
if (a mod i = 0) then inc(nda);
for i := 1 to b do
if (b mod i = 0) then inc(ndb);
if (nda > ndb) then
writeln(a, ' has more divisors than ', b)
else if (ndb > nda) then
writeln(b, ' has more divisors than ', a)
else
writeln(a, ' and', b, ' has equal number of divisors')
end.
1) 27*8=216 бит
2)52*2=104 байта
3)38*2=76 байт
4)32*8=256 бит
6)20*35*2=1400
Прошу прощения, но не знаю сколько битов или байтов в кодировке КОИ-8, поэтому не могу решить 5
Cls
input a
b=a>=10 and a<=99
print b
Нет смысла писать 2 раза X. Достаточно написать всего 1.
Ответ: X&1