16 бит - 2 байта. 2*1240*480=1190400 байт 1190400/1024=1162,5 КБайт
32=2^5
256=2^8 количество бит на цвет уменьшилось на 3, значит в (2^3 = 8) уменьшился объем в оперативке
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var n := ReadlnInteger('N=');
var R := new integer[n];
repeat
var a := ReadlnString.ToCharArray;
if a.Length <> N then break;
if a.Where(c -> c = '+').Count = 1 then
Inc(R[a.IndexOf('+')])
until False;
R.Transform(t -> t >= 0.07 * N ? 1 : 0);
R.Numerate.Where(t -> t[1] = 1).Select(t -> t[0]).Println
end.
<h3>Пример</h3>
(окончание ввода - строка длины отличной от N)
N= 5
-+---
--+--
-+---
+----
-+---
--+--
-+---
+----
----+
-+---
1 2 3 5
Алгоритм
<span>1. Взять чайник.
</span><span>2.налить в него холодной воды.Если там есть вода вылить её.
</span><span>3.поставить на плиту.
</span><span>4.включить плиту.
</span><span>5.снять чайник с огня, когда вода закипит.
</span><span>6.Взять кружку для чая.
</span><span>7. положить в кружку заварки.
</span>8. налить кяпяток из чайника.
<span>9. когда чай заварится, вытащить пакетик.</span>
a) risunok, cherteji; b) tablitza, grafic,shema c) formula;