32=2^6 => Для русского языка 1 символ несет 6 бит инфы.
26=2^i => i = log 26 по основанию 2 = 4,7 бит => Для фр. языка 1 символ несет 4,7 бит инфы.
V информации = 10 * 6 бит = 60 бит (для русского языка)
V информации = 10 * 4,7 бит = 47 бит (для фр. языка)
Значит для русского языка сообщение из 10 знаков несет больше информации.
Связь или есть варианты информаций ?
................
a:=38;
b:=a+9;
a:=b-a;
writeln(a);
writeln(b);
.................
Ответ: a = 9, b = 47.
Объяснение: дано начальное значение 38. Переменной B присвоить значение a+9, то есть 38+9 = 47. Из этого следует, что b = 47. Переменной a присвоить значение b-a, то есть 47-38 = 9. Из этого следует, что a = 9.
Uses crt;
var s:string;
n,i:integer;
begin
readln(s);
n:=length(s);
for i:=1 to n do
if s[i]=s[n] then delete(s,i,1);
writeln(s);
end.
Эта программа рассчитана на то, что удаляется и последний символ тоже