Решения находятся в приложениях.
Красным цветом показаны результаты выполнения алгоритмов.
begin
var a := 1234567;
var s := 0;
while a > 0 do
begin
s += Ord(a mod 10 mod 2 = 0);
a := a div 10;
end;
s.Println;
end.
Кодировка влияет на объём одного символа, например в кодировке КОИ-8 один символ весит 1 байт(8 бит), а в кодировке unicode - 2 байта(16 бит)
<script type="text/javascript">
var eu=71.3805321;
var dol=64.4205373;
var rub=prompt('Enter value in ruble:','rub');
alert('$:'+rub/dol+' eu:'+rub/eu);
<span> </script></span>
В формате "целое без знака" с помощью n двоичных разрядов можно записать числа от 0 до 2^n - 1 (это соответствует записям от 000...0 до 111...1, где в каждом числе по n разрядов).
При n = 11 максимальное число равно 111...1_2 (11 разрядов) = 2^11 - 1 = 2048 - 1 = 2047