A) F=A*B*¬A*B+B ( Формула A*¬A=0)
F=B
б) F=(A+B)*(¬A+¬B)
F=A*¬B+¬A*B
F=A⊕B
в) F=A+A*B+A*C
F=A*(1+B+C)
F=A
Вот программа, выводит примерно так, как на картинке.
Program p_1;
var
i, j : integer;
begin
for i := 1 to 10 do
begin
for j := 1 to 10 do
write(i * j, ' ');
end;
end.
В строке
<span>for i in range(10000,99999):
нужно вместо "i" написать "a"
</span><span>for a in range(10000,99999):
На паскале:
var a:longint;
begin
for a:=10000 to 99999 do
if (a mod 133=125) and (a mod 134=111)
then writeln(a);
end.
Результат:
<span>19809
37631
55453
73275
91097</span></span>
Var x,y: real;
<span>begin
</span><span> write('x y через пробел: '); readln(x,y);
</span><span> if ((-6<=x) and (x<=1) and (-3<=y) and (y<=7)) and
</span><span> not ((-3<x) and (x<=1) and (-3<=y) and (y<2)) then
</span><span> writeln('точка принадлежит области')
</span><span> else writeln('точка не принадлежит области');
</span><span>end.
</span>x y через пробел: -2 1.5
<span>точка не принадлежит области
</span>x y через пробел: - 4 5
<span>точка принадлежит области
</span>