Var a,n:integer;
begin
writeln('Введите n');
readln(n);
for a:=10 to 99 do
if (a mod n =0)then writeln(a);
<span>end.</span>
Разбиваем справа налево по три разряда и записываем соответствующую восьмеричную цифру.
010 011 -> 23 (8)
Вот мой вариант:
Кодирование в шестнадцатиричном коде:
** Я напишу в 16 - ом коде чтобы ответ не был слишком большим.
<span>Исходный текст: Не цветы а вянут - Уши
Кодирование: </span>0E2C2D0E2E1E140E2F1F0E2E1B0E2E1E0E2F1B0E2F2B140E2E19140E2E1B0E2F2F0E2E2D
0E2F1C0E2F1B1416140E2D1C0E2F210E2E21
<span>
Исходный текст: Не ладоши а ими хлопают - Уши
Кодирование:
</span>0E2C2D0E2E1E140E2E2B0E2E190E2E1D0E2E2E0E2F210E2E21140E2E19140E2E210E2E2C
0E2E21140E2F1E0E2E2B0E2E2E0E2E2F0E2E190E2F2E0E2F1B1416140E2D1C0E2F210E2E2
1<span>
Исходный </span>текст<span>: Не бельё а их развешивают - Уши
Кодирование:
</span>0E2C2D0E2E1E140E2E1A0E2E1E0E2E2B0E2F2C0E2B21140E2E19140E2E210E2F1E140E2F
190E2E190E2E200E2E1B0E2E1E0E2F210E2E210E2E1B0E2E190E2F2E0E2F1B1416140E2D1
<span>C0E2F210E2E21
</span><span>
Исходный </span>текст<span>: Доверчивые и любопытные - Люди
Кодирование:
</span>0E2C1D0E2E2E0E2E1B0E2E1E0E2F190E2F200E2E210E2E1B0E2F2B0E2E1E140E2E21140E
2E2B0E2F2E0E2E1A0E2E2E0E2E2F0E2F2B0E2F1B0E2E2D0E2F2B0E2E1E1416140E2C2B0E2
F2E0E2E1D0E2E21<span>
</span>Исходный текст: <span>А еще на них можно вешать лапшу - Уши
</span>Кодирование:
0E2C19140E2E1E0E2F220E2E1E140E2E2D0E2E19140E2E2D0E2E210E2F1E140E2E2C0E2E
2E0E2E1F0E2E2D0E2E2E140E2E1B0E2E1E0E2F210E2E190E2F1B0E2F2C140E2E2B0E2E190
E2E2F0E2F210E2F1C1416140E2D1C0E2F210E2E21
Исходный текст: Его проглатывают упорно, Не желая о чем-либо говорить<span> - Язык
</span>Кодирование:
0E2C1E0E2E1C0E2E2E140E2E2F0E2F190E2E2E0E2E1C0E2E2B0E2E190E2F1B0E2F2B0E2E
1B0E2E190E2F2E0E2F1B140E2F1C0E2E2F0E2E2E0E2F190E2E2D0E2E2E0E1B2C140E2C2D0
E2E1E140E2E1F0E2E1E0E2E2B0E2E190E2F2F140E2E2E140E2F200E2E1E0E2E2C160E2E2B
0E2E210E2E1A0E2E2E140E2E1C0E2E2E0E2E1B0E2E2E0E2F190E2E210E2F1B0E2F2C14161
40E2D2F0E2E200E2F2B0E2E2A
Исходный текст: <span>Он может быть хорошо подвешан - Язык
</span>Кодирование:
0E2C2E0E2E2D140E2E2C0E2E2E0E2E1F0E2E1E0E2F1B140E2E1A0E2F2B0E2F1B0E2F2C14
0E2F1E0E2E2E0E2F190E2E2E0E2F210E2E2E140E2E2F0E2E2E0E2E1D0E2E1B0E2E1E0E2F2
10E2E190E2E2D1416140E2D2F0E2E200E2F2B0E2E2A
Исходный текст: <span>За него тянут или дёргают - Язык
</span>Кодирование:
0E2C200E2E19140E2E2D0E2E1E0E2E1C0E2E2E140E2F1B0E2F2F0E2E2D0E2F1C0E2F1B14
0E2E210E2E2B0E2E21140E2E1D0E2B210E2F190E2E1C0E2E190E2F2E0E2F1B1416140E2D2
<span>F0E2E200E2F2B0E2E2A</span>
<span>
</span>Исходный текст: <span>Его можно держать за зубами - Язык
</span>Кодирование:
0E2C1E0E2E1C0E2E2E140E2E2C0E2E2E0E2E1F0E2E2D0E2E2E140E2E1D0E2E1E0E2F190E
2E1F0E2E190E2F1B0E2F2C140E2E200E2E19140E2E200E2F1C0E2E1A0E2E190E2E2C0E2E2
11416140E2D2F0E2E200E2F2B0E2E2A<span>
============================================</span>
На фото решение полное твоего задания
Допустим жесткий диск у нас C тогда:
С:\Литература\Поэзия\Пушкин