042
Из первого кода правильно получается цифра 2 (так как 8 из 4 не правильно, а шесть есть и в 1, и во втором на одинаковых местах). Из второго цифра 4. И из третьего цифра 3.
Нужно сопоставить слова и их значения
например к 1 подходит 2
ко 2 4
8=i^2, значит 1 символ весит 3бита
3*32=96бит
Ответ в прикрепленном файле
var
i,k,l:integer;
s:string;
begin
readln(s);
k:=0;
i:=1;
while i<length(s) do
begin
l:=0;
while (s[i]<>' ') and (i<length(s)) do
begin
l:=l+1;
i:=i+1;
end;
i:=i+1;
if l>k then k:=l;
end;
writeln(k);
end.