Смотря сколько цветов
<span>256 - 1 пиксель -1 байт </span>
<span>2^24 1 п - 3 байта </span>
<span>2^32 1 п - 4 байта</span>
Миша - 5, музыка
Оля - 6, художка
Коля - 7, спорт
<h3>PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(10, -50, 50);
a.Println;
var b := ArrRandom(10, -50, 50);
b.Println;
var c := a.Zip(b, (p, q)-> p * q).ToArray;
c.Println
end.