Var
x,k:integer;
a:array[1..100] of integer;
begin
k := 0;
read(x);
while x <> 0 do
begin
k := k + 1;
a[k] := x;
read(x)
end;
writeln(k);
for x := 1 to k do
write(a[x],' ')
<span>end.</span>
Клавиатура - это система, состоящая из взаимосвязанных частей, потому что благодаря разным комбинациям клавиш мы можем производить различные действия.
Числовой.
Если число X, вернуть результат (X-1)/2.
Иначе вернуть "Не могу".
N=2^i где N - количество цветов, i - глубина цвета.
256 = 2^i
2^8 = 2^i
i=8 бит = 1 байт
640*1024*1 = 640*1024 (байт) = 640 Кбайт
Ответ: 640 Кбайт
Файрволл или брендмауэр (Просто по разному называют) Блокирует трафик с интернета следуя заданным параметрам.