<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(ReadInteger('n='), -50, 50);
a.Println;
var s := a.Partition((v, i) -> i.IsEven);
s[0].Println;
s[1].Println;
end.
<h2>n= 10</h2><h2>24 31 -29 -21 32 23 -17 34 16 -25</h2><h2>24 -29 32 -17 16</h2><h2>31 -21 23 34 -25</h2>
var
st:string;
i,a,pr:integer;
begin
<em>readln(st,a);</em>
pr:=1;
for i:=1 to 4 <em>do</em>
pr:=pr*(ord(st[i])-ord('0'));
<em>writeln(pr mod a=0);</em>
end.<span>
</span>
<span> Редактор Paint имеет возможность загрузки, редактирования и записи в файл полноэкранных изображений. Поскольку редактор поддерживает технологию OLE, то полученные рисунки можно скопировать в буфер, оформить их в виде объекта и встраивать в тексты редактора WordPad и иных Windows-приложений. При этом редактор Paint может быть как сервером, так и клиентом при динамическом обмене данными между различными приложениями.
надеюсь правильно поняла вопрос</span><span />
<span>4 Кбайта=2^12 Байтов=2^15 битов
</span>16 Мбайтов=2^14 Кбайт= 2^24 байтов= 2^27 бита
2 Гбайта= 2^11 Мбайтов= 2^21 Кбайтов= 2^34 Битов
2) <,> или =:
32 байта(256 бит) <> 64 бита
1024 байта(8192 бит) <> 64 бита