N=16
K=2048
16ти символьный авфавит это четыре знака например: 0000
i=4
множим символы на бит шифра.
2048×4=8192
Теперь считаем сколько килобайт весит сообщение
8192:8000=1.024
<em>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var i:=1;
repeat
Print(i);
Inc(i); Inc(i); // идиотизм, но таково задание
until i>16;
Writeln
end.
<u>Результат</u>
1 3 5 7 9 11 13 15
А по-хорошему эта программа пишется так:
begin
Range(1,16,2).Println
end.