Информация представлена в 0 и1,
о-ложь
1- истина (для примера )
любой файл можно записать в последовательности нулей и единиц
компьютер работает с непривычной для нас информацией,а с килобайтами,мегабайтами,гигабайтами...
бит принимает всего 2 значения,1 и 0- истина/ложь
в одном байте -8 бит,,а каждая последующая единица больше предыдущей в 1024 раза
1 бит = 1 символу
1 байт = 8 бит
1килобайт = 1024 байта
3,5 * 1024= 3584 байта
3584 * 8 = 28672 бит
ответ в тексте 28672 симв
Var
s:string;
i,n,w:integer;
begin
writeln('Введите текст');
readln(s);
s:=s+' ';
n:=length(s);
for i:=1 to n do
if (s[i]='а') and (s[i+1]=' ') then
inc(w);
writeln('Кол-во = ',w);
<span>end.</span>