N=2^i.i=5, следовательно Каждый символ кодируется 5 битами.
33*59*2*5=19470(бит)=2433,75(байт)
А где сама задача? ты можешь прислать фотографию задания , или написать
var s: string;
i: integer;
begin
readln(s);
for i:=1 to length(s) do if s[i]=' ' then begin
if s[1]=s[i+1] then
writeln('слова начинаются с одной и той же буквы')
else writeln('слова начинаются с разных букв');
if s[i-1]=s[i+1] then
write('второе слово начинается с той же буквы, на которую заканчивается первое слово')
else
write('второе слово не начинается с той же буквы, на которую заканчивается первое слово');
break;
end;
end.