<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ArrGen(10,i->3*(i+1)); a.Println;
end.
<u>Результат</u>
3 6 9 12 15 18 21 24 27 30
ШУМ-ГАМ
ЖАРА-ТЕПЛО
БЕДА-ГОРЕ
МОРОЗ-ХОЛОД
ПУРГА-МЕТЕЛЬ
ГРУСТЬ-ТОСКА
ПРОЧНЫЙ-КРЕПКИЙ
ПРОСИТЬ-МОЛИТЬ
СМЕЯТЬСЯ-ХОХОТАТЬ
НЕБОЛЬШОЙ-МАЛЕНЬКИЙ
БАЛОВАТЬСЯ-ШАЛИТЬ
ДОДУМАТЬ-ДОДЕЛАТЬ
Пароль формируется из 6 символов,
каждый символ кодируется i - битами.
2^i =6; ---> 2^2< 6 < 2^3 ---> 3 бита для кодировки одного символа.
В одном пароле 11 символов, длина пароля =3*11=33 бита.
Каждый пароль - целое количество байтов :
33 бита =33:8 байтов =5 байтов
Для 20-ти паролей: 5*20=100 байтов.
Мощность алфавита N=512
Вес одного символа b = 9, (2^9=512)
9*22=198
3 л: 8 л:
1. 3 0 (налить 3л)
2. 3 3 (перелить из 3л в 8л и налить в 3л.)
3. 0 6 (перелить из 3л в 8л)
4. 3 6 (налить 3л)
5. 1 8 (перелить из 3л в 8л)
6. 1 0 (вылить 8 л)
7. 0 1 (перелить из 3л в 8л)
8. 3 1 (налить 3л)
9. 0 4 (перелить из 3л в 8л)
10. 3 4 (налить 3л)
11. 0 7 (перелить из 3л в 8л)