Uses crt;
var a:integer;
begin
a:=10000;
repeat
if (a mod 133=125) and (a mod 134=111) then writeln(a);
a:=a+1;
until a>99999;
end.
1. ¬(A*B+¬C)
По закону де Моргана раскрываем скобки:
(¬А + ¬B) * C
В принципе уже упрощена, но по закону дистрибутивности еще можно записать как
¬А * С + ¬B * C
2. (x+z)*(x+¬z)*¬y
По закону склеивания выражение (x+z)*(x+¬z) = x
То есть все выражение будет иметь вид x*¬y
Начало
пока (справа свободно) закрасить > вправо
если (справа стена) то
пока (закрашено) влево ( не уверен по поводу существования такой команды)
конец
Двоичная: 1000000001, 1001011000, 100001010, 10000111111100
Шеснадцатиричная: 201, 258, 10а, 21fc
Восьмиричная: 1001, 1130, 412, 20774
<span>
</span>
Если возникнут какие-нибудь вопросы, пиши