Встреться с ним в школе,попроси фото,конечно лучше ничего не делать и не общаться с ним.
Ухххххх всё возможно не рационально решал но должно всё правельно быть(проверял)
uses crt;
var A:array[1..4,1..5] of integer;
i,j,n,p:integer;
begin
for i:=1 to 4 do
begin
for j:=1 to 5 do
begin
A[i,j]:=random(9);
write(A[i,j],' ');
end;
writeln;
end;
writeln;
for i:=1 to 4 do
begin
n:=A[i,1];
A[i,1]:=A[i,5];
A[i,5]:=n;
end;
for i:=1 to 4 do
begin
for j:=1 to 5 do
begin
write(A[i,j],' ');
end;
writeln;
end;
for i:=1 to 5 do
begin
p:=p+A[1,i];
p:=p+A[4,i];
end;
for i:=2 to 3 do
begin
p:=p+A[i,1];
p:=p+A[i,5];
end;
writeln(p);
<span>end.</span>
A) (0∨1)∨(1∨0) = 0∨1∨1∨0 = 1 (дизъюнкция истинна, если истинен хотя бы один элемент)
b) ((1∨1)∨0)∨1 = (1∨0)∨1 = 1∨1 = 1
c) (1→1)∨(0↔0) = (¬1∨1)∨(0∧0)∨(¬0∧¬0) = 1∨0∨1 = 1
d) 1∧(1∧1)∧1 = 1∧1∧1 = 1
Windovs 95,Mac OS 9,Windows Server 2003,<span>ubuntu.</span>