var a : array [1..3,1..4] of integer;
i,j,k:integer;
begin
for i:=1 to 3 do
begin
for j:=1 to 4 do
begin
a[i,j]:=random(90)+10;
write(a[i,j]:4);
if a[i,j] mod 2=0 then k:=k+1
end;
writeln;
end;
writeln('Количество четных элементов массива: ',k);
end.
2. Локальные, глобальные,региональные
1. <span>Сети отделов, сети кампусов, корпоративные сети</span>
<h2>=EXP(x) - ACOS(x)</h2>
где x - ячейка, содержащая число x.
? - фальшивая
+ - настоящая
dif - знание о весе фальшивой (больше или меньше)
vs - взвешивание
=> - итог взвешивания
1 откладываем
1) 7? vs 7?
if == => 14+ 7? goto 2)
if <> => 7+ 14? goto
2) 4? vs 4+
if == => 18+ 3? goto 3)
if <> => 10+ 4? goto
3) 2? vs 2+
if == => 20+ 1? goto 4)
if <> => 19+ 2? goto
4) 1? vs 1+
if == => фальшивая та что отложена вначале
if <> => нашли