1024 Кб = 1024×1024 байта
1 бит = 1/8 байта
1 Кб = 1024 байта
В порядке убывания: 1024 Кбайта, 1 Кбайт, 1000 байт, 1 байт, 1 бит
N=3 (три цвета прожектора)
i=4 (прожекторы)
A= N^i
A=3^4=81
2. Найти сумму чисел массива в переменной Sum, а потом:<span> </span>
<span>Writeln('Сумма элементов массива чётное число = ', not odd(Sum));</span>
1.
<span>var</span> m<span>:</span><span>array</span><span>[</span><span>1</span>..<span>100</span><span>]</span><span>of</span><span>integer</span>;
i<span>,</span>a<span>,</span>n<span>:</span><span>integer</span>;
<span>begin</span><span>write</span><span>(</span><span>'Введите размерность массива: '</span><span>)</span>;<span>readln</span><span>(</span>n<span>)</span>;
<span>write</span><span>(</span><span>'Введите число А: '</span><span>)</span>;<span>readln</span><span>(</span>a<span>)</span>;
<span>writeln</span><span>(</span><span>'Введите массив: '</span><span>)</span>;
<span>for</span> i<span>:=</span><span>1</span><span>to</span> N <span>do</span><span>readln</span><span>(</span>m<span>[</span>i<span>]</span><span>)</span>;
<span>writeln</span><span>(</span><span>'Массив: '</span><span>)</span>;
<span>for</span> i<span>:=</span><span>1</span><span>to</span> N <span>do</span>
M<span>[</span>i<span>]</span><span>:=</span>m<span>[</span>i<span>]</span><span>-</span>a;
<span>for</span> i<span>:=</span><span>1</span><span>to</span> N <span>do</span><span>write</span><span>(</span>M<span>[</span>i<span>]</span><span>,</span><span>' '</span><span>)</span>;
<span>end</span>.
Не видно. Большие фото зделай.