1. Уменьшить разрешение ppi
2. Уменьшить глубину цвета
3. Кодировать с палитрой
4. Применять алгоритмы сжатия. Например алгоритм повторяющихся цепочек (RLE)
begin
var s := ReadlnString('Введите строку:');
for var i := 1 to s.Length do
case s[i] of
'.': s[i] := '0';
'X', 'Х': s[i] := '1'
end;
Println('Двоичный код:', s);
end.
===== PascalABC.NET =====
Что должно входить в твой проект ???
Берем с точки (-5;7),чертим до точки (-3;11),теперь вниз до точки (-3;1).Векторы в точке (-5;7) и (-3,11).