Выделить объект(ы) для архивации, щелкнуть по ним правой клавишей мыши, выбрать иконку WinRAR, щелкнуть по нему, выбрать "добавить в архив"
Const
n=36;
s='Юля';
begin
Writeln('Код ',n,' принадлежит символу "',Chr(n),'"');
Writeln('Длина слова "',s,'" в байтах равна ',Length(s));
Writeln('В битах это составляет ',8*Length(s))
end.
Результат
Код 36 принадлежит символу "$"
Длина слова "Юля" в байтах равна 3
В битах это составляет 24
756 бит =94,5 байт 176 килобайт =180224 байт 577 мегабайт =590848 килобайт
1. Торты = (Торты | Пироги) - Пироги = 12000 - 7700 = 4300
2. Аналогично с 1: 14200 - 9700 = 4500