Посмотрите на приведенный рисунок. Это монохромный рисунок: для его выполнения использовали всего два цвета( черный и белый Размер этого рисунка 128×128 пикселей. Определите объем видеопамяти в кбайтах необходимы и достаточный для храненич этого рисунка. В ответе запишите толткр число, наименование единицы измерения записывать не нужно

===== PascalABC.NET =====

type

 Vector = array of real;

function operator +(a, b: Vector): Vector;

   ExtensionMethod := a.Zip(b, (p, q) -> p + q).ToArray;

function operator -(a, b: Vector): Vector;

   ExtensionMethod := a.Zip(b, (p, q) -> p - q).ToArray;

function operator *(s: real; a:Vector): Vector;

   ExtensionMethod := a.ConvertAll(p -> p * s);

begin

 var a: Vector := ReadArrReal('Вектор a:', 3);

 var b: Vector := ReadArrReal('Вектор b:', 3);

 var c: Vector := ReadArrReal('Вектор c:', 3);

 var k := ReadReal('k =');

 Println(k * (a + b) + (1 - k) * (a + c))

end.