Два сообщения содержат одинаковое количество информации. количество символов в первом тексте в 2, 5 раза меньше, чем во втором. сколько символов содержат алфавиты, с которых записаны сообщения, если известно, что размер каждого алфавита не превышает 32 символов и на каждый символ приходится целое число битов? сделайте решение по проще )

V=K*I;
V - объем сообщения
K - количество символов в сообщении I - вес одного символа;
N=2^I, где N мощность алфавита (N≤32 ⇒ I≤5);
V₁=V₂ (объёмы сообщений);
2,5*K₁ = K₂
V₁=K₁*I₁;
V₂=K₂*I₂=2,5*K₁*I₂;
приравняем объёмы
K₁*I₁=2,5*K₁*I₂ ⇒
I₁ = 2,5*I₂
решим уравнение в целых числах, учитывая, что любое I≤5
( можно подставлять числа для I₁ от 1 до 5 и найти то решение, при котором I₂ - целое число);
у меня получилось I₁ = 5; I₂=2 т.к. 5=2,5*2
нам нужны мощности 1го и 2го алфавитов
N₁=2^I₁=2⁵=32 символа;
N₂=2^I₂=2²=4 символа.

1. "Школьное" решение

// PascalABC.Net 3.0, сборка 1066
var
  s,s1:string;
  i:integer;
  a:char;
begin
  Write('Введите натуральное число любой длины :'); Readln(s);
  Write('Введите цифру, которую надо удалить: '); Readln(a);
  s1:='';
  for i:=1 to Length(s) do
    if s[i]<>a then s1:=s1+s[i];
  Writeln('Результат: ',s1)
end.

Тестовый прогон:
Введите натуральное число любой длины :3141592653589793
Введите цифру, которую надо удалить: 5
Результат: 3141926389793

2. Современное решение (так в школе почему-то не учат)

// PascalABC.Net 3.0, сборка 1066
begin
  var s:=ReadString('Введите натуральное число любой длины :');
  var a:=ReadChar('Введите цифру, которую надо удалить: ');
  Write('Результат: ',s.Replace(a,''));
end.

Проще всего складывать в столбик как обычные десятичные числа, но если в сумме число получится больше 8 (система восмиричная), то мы отнимаем 8, смотрим: меньше ли получившийся остаток 8, если нет, то снова отнимаем восемь и тогда записываем остаток, а в "ум" запишем число отнятых восьмерок

574+467=1263 (все числа в восьмиричной системе счисления)

так, складывая 4 и 7, получаем 11, что больше 8, поэтому отняв 8, получим цифру 3, которую и записываем как последнюю цифру числа (3 пишем, 1 в уме), далее складываем 6 и 7 и не забываем про 1, потому что в раз мы отняли всего одну восьмерку, получаем 14, но записываем только 6, а 1 в уме, затем 5, 4 и 1 - 2 пишем, 1  в уме, далее просто приписываем единицу, получаем 1263

P.S. несмотря на то, что кажется сложно, это немногим отличается от десятичной системы сложения в столбик