===== PascalABC.NET =====
begin
var q := new Queue<integer>(SeqRandom(10, -99, 99));
q.Println;
q.Enqueue(q.Take(5).Sum);
q.Println;
end.
<h3>в первом задании выйдет квадрат на две клетки.во втором задании 1-2,2-3,3-1.надеюсь понятно</h3>
478 * 478 = 228484 пикселей
4 Кбайт = 4096 байт = 32768 бит
228484 / 32768 = 7 бит на пиксель
7² = 49
Ответ 49 цветов