Ошибка <span>Меркурий</span> т.к все слова на английском ,а это на русском
На один символ (букву) необходим 1 байт информации или 8 бит.
B3: =СТЕПЕНЬ(А3;2) ⇒ 7^2 ⇒49
C3: =СУММ(А3:В3) ⇒ 7+49=56
D3: =ЕСЛИ(С3<60;МАКС(А3:С3);МИН(А3:С3)) ⇒ <span>МАКС(А3:С3) </span>⇒ 56
Var s:string;
r:real;
i,j,n:integer;
begin r:=0;
readln(s);
for i:=1 to length(s) do begin n:=0; for j:=1 to length(s) do begin
if s[i]=s[j] then inc(n);
end;
r:=r+1/n;
end;
writeln('количество различных букв = ', r:1:0);
end.
2.