101010 + 1110 = 111000
1010 + 1111 = 11001
1000 + 1011 = 10011
Один бит информации уменьшает неопределенность в два раза.
Function reverse(s:string):string;
var s1:string;
i:integer;
begin
for i:=1 to length(s) do
s1:=s[i]+s1;
reverse:=s1;
end;
var s:string;
begin
readln(s);
s:=reverse(s);
writeln(s);
<span>end.</span>
23 символа умножаешь на 8 битов
Получается 23*8=182 бита или 23 байта. (Один символ=1 байт=8 битов)
Компьютер,именно он хранит,собирает перерабатывает всю информацию