Поищи как в инете сайты делать за 5 минут и там все будет написано, поверь мне, я сам так раньше делал, а теперь забыл.
Примерно по такой схеме (см. рисунок в приложении):
<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrGen(7,3,t->3*t); a.Println
end.
<u>Результат</u>
3 9 27 81 243 729 2187
55 кбайт = 56320 байт.
56320 байт = <span>450560 бит.
</span>информационная ёмкость одного знака в алфавите:
450560 / 40960 = 11 бит.