Как то так~
1. Пойти в пекарню
2. Взять хлеб с витрины
3. Расплатиться за хлеб
, следовательно, 3 бита - вес одного символа.
23 * 3 = 69 бит.
824|2
8.....| 412
...2
...2
.......4
.......4
_______
.......0
ответ 412
Program n1;
uses crt;
var n,m,p,k:integer;
begin
write('введите число: ');
readln(n);
m:=n;
k:=0;
while m<>0 do begin
p:=m mod 10;
if p=4 then k:=k+1;
m:=m div 10;
end;
writeln('кол-во 4: ',k);
end.
Потому что в жёстком диски есть много гигов и памяти да и вообще, а в таких обыкновенных мало и они могут сломаться легко