В байте 8 бит, в килобайте 1024 байта, в МБ 1024 КБ и т.д.
614400 бит / 8 = 76800 байт
76800 байт / 1024 = 75 килобайт
75 / 1024 = 0.073 МБ (приблизительно)
614400 бит 76800 байт 75 КБ 0.073 МБ
4194304 бит 534388 байт 512 КБ 0.5 МБ
2097152 бит 262144 байт 256 КБ 0.25 МБ
33554432 бит 4194304 байт 4096 КБ 4 МБ
42 (8) = 100 010 (2)
0010 0010 (2) = 22 (16)
Var n,a,i,k:integer;
begin
write('n = ');
readln(n);
k:=0;
writeln('Вводите числа:');
for i:=1 to n do
begin
readln(a);
if a mod 4 = 0 then k:=k+1;
end;
writeln('k = ',k);
end.
Пример:
n = 5
Вводите числа:
15
24
73
48
94
k = 2