<span>В СЛОВЕ МЕГАБАЙТ 64 бита, т. к. каждая буква - 1 байт, а в каждом байте 8 бит</span>
8 бит - 1 байт бла бла бла бла
адрес клада :тихии океан,остров4 пальм,восточная пальма ,клад.
Вот перевод в десятичную систему:
1110(2) = 1*2^3+1*2^2+1*2^1+0*2^0 = 8+4+2 = 14
1001(2) = 1*2^3+0*2^2+0*2^1+1*2^0 = 8+0+0+1 = 9
14+9=23
Program zz;
var a:integer;
begin
readln(a);
a:=a mod 10;
if a mod 2=0 then writeln(a,' -четное число')
else writeln(a,' -нечетное число');
<span>end.</span>