Var
a: array[1..10]of integer;
i, k, n: integer;
begin
Writeln('Исходный массив:');
Randomize;
for i := 1 to 10 do
begin
a[i] := Random(51) - 25;
Write(a[i], ' ');
end;
Writeln;
n := 0;
k := 0;
for i := 10 downto 1 do
if a[i] > 0 then
begin
k := k + 1;
if k = 2 then n := i;
end;
if k = 0 then
Writeln('В массиве нет положительных элементов!')
else
Writeln('Предпоследний положительный элемент: a[', n, '] = ', a[n]);
Readln;
end.
Відповідь:
Путь С
Пояснення:
Потому что черные точки на схеме означают блокировку сигнала кнопки, и сигнал не дойдет до двери. А на пути С их нету. Вот и все.
Как-то глуповато получилось, но, как говорится, каков вопрос - таков ответ:
=IF(OR(ROW(A1)=1;AND(ROW(A1)=2;<span>COLUMN(A1)=2));1;0)
</span>
В Excel это будет так:
=ЕСЛИ(ИЛИ(СТРОКА(A1)=1;И(СТРОКА(A1)=2;СТОЛБЕЦ(A1)=2));1;0)
Что-то бредятина какая-то :D
скорей всего, модем не может быть источником (если, конечно, в него не вставляется флешка, естественно с вирусом)
ну или же уничтожение компьютерных вирусов ну никак не может быть источником...
<span>32=2^5 => i=5
</span>Формула количества информации в тексте I=k*i
<span>Значит I=10*5=50бит </span>