Описать письменно в тетради ваш будущий сайт, какую именно информацию вы хотите отразить и как оформить сайт, напишите правила которым стоит придерживаться при оформлении сайта.
Нарисуем на диаграмме, при каких x выражение ((x ∈ A) → (x ∈ P)) ∧ ((x ∈ Q) → ¬(x ∈ A)) истинно. Выражение состоит из двух условий, соединенных логическим и, так что оно будет истинным в том и только в том случае, когда оба условия истинны.
(x ∈ A) → (x ∈ P) истинно всегда, кроме случая x ∈ A, x ∉ P. На рисунке область истинности выделена синей штриховкой. (x ∈ Q) → ¬(x ∈ A) истинно всегда, кроме случая x ∈ Q, x ∈ A. На рисунке эта область выделена зелёной штриховкой.
Формула истинна, если x принадлежит областям, выделенным обеими штриховками одновременно. Если формула верна при всех x, то области, не выделенные какой-то из штриховок, не содержат элементов, так что всё множество A состоит из элементов, которые есть в P, но которых нет в Q (эта область на рисунке помечена звёздочкой). Подходящих элементов всего 7: P \ Q = {2, 4, 8, 10, 14, 16, 20}, – так что максимальное количество элементов в A равно семи.
Const m=10; n=8; var a:array[1..m,1..n] of integer; i,j:integer; p:double;
begin Randomize; Writeln('Исходный массив'); for i:=1 to m do begin for j:=1 to n do begin a[i,j]:=Random(101)-50; Write(a[i,j]:4); end; Writeln end; p:=1; for j:=1 to n do if a[3,j]>0 then p:=p*a[3,j]; Writeln('Искомое произведение: ',p) end.
(x ∈ A) → (x ∈ P) истинно всегда, кроме случая x ∈ A, x ∉ P. На рисунке область истинности выделена синей штриховкой.
(x ∈ Q) → ¬(x ∈ A) истинно всегда, кроме случая x ∈ Q, x ∈ A. На рисунке эта область выделена зелёной штриховкой.
Формула истинна, если x принадлежит областям, выделенным обеими штриховками одновременно. Если формула верна при всех x, то области, не выделенные какой-то из штриховок, не содержат элементов, так что всё множество A состоит из элементов, которые есть в P, но которых нет в Q (эта область на рисунке помечена звёздочкой). Подходящих элементов всего 7: P \ Q = {2, 4, 8, 10, 14, 16, 20}, – так что максимальное количество элементов в A равно семи.
ответ: 7.
m=10;
n=8;
var
a:array[1..m,1..n] of integer;
i,j:integer;
p:double;
begin
Randomize;
Writeln('Исходный массив');
for i:=1 to m do
begin
for j:=1 to n do
begin
a[i,j]:=Random(101)-50;
Write(a[i,j]:4);
end;
Writeln
end;
p:=1;
for j:=1 to n do
if a[3,j]>0 then p:=p*a[3,j];
Writeln('Искомое произведение: ',p)
end.
Тестовое решение:
Исходный массив
35 30 35 -25 -50 8 -20 47
-34 -26 -7 34 -9 -31 10 -46
-17 -21 27 8 27 41 35 -48
30 -44 25 48 30 -20 10 -6
-3 -10 45 -33 3 -38 -11 -8
47 -25 -27 -7 2 -20 -4 -48
-38 32 -29 -41 31 16 46 44
45 33 -4 45 34 -18 -33 37
15 49 -14 -49 -25 -8 1 -30
41 -15 11 1 17 -8 0 -1
Искомое произведение: 8368920