нарисовал схему, вроде все видно
1. Переводим в двоичную систему
11000101 11101101 00000000 00000000
2. Первая 1 в старшем байте (
<u>1</u>1000101
) значит число отрицательное.
3. Оставшиеся 7 цифр это порядок числа ( 1000101
- 1000000 = 101) это 5 в десятичной системе.
4.Значит наше число это 11101, 101 в двоичной
5. Переводим в десятичную получаем -29,625
В алф.36 !букв. Значит делим на 8 символов. Сообщений получ. 4
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
WriteAllText(ReadlnString('Куда?'),ReadLines(ReadlnString('Откуда?'))
.SelectMany(x->x)
.Where(c->Pos(LowCase(c),'бвгджзйклмнпрстфхцчшщ')>0)
.JoinIntoString)
end.
