Если текст то word ..............
Ну переводишь всё в 10-ю (сумма произведений разрядов на с.с. в степени позиции разряда):
(3 * x^0) + (3 * x^1 + 1 * x^0) = (1 * x^2 + 1 * x^1) <=>
3 + 3x + 1 = x^2 + x <=>
x^2 - 2x - 4 = 0
D = 4 - 4 * 1 * (-4) = 20
=> x - не целый => решения нет
Обозначения:
A = (x&A≠0)
B= (x&14≠0)
C= (x&75≠0)
----------------------------
1) A→(¬B→C) =1
¬A+(B+C)=1
A=B+C
2) 14 (10cc)=1110 (2cc)
75= (10cc)=100 1011 (2cc)
3) 100 1011 (+ поразрядное логическое сложение)
000 1110
------------
100 1111 = 79 (10cc) ответ 79
Var x, y: real;
begin
writeln (' Ââåäèòå ÷èñëà x, y');
readln (x,y);
if x>y then x:=x-y
else x:=x-y;
if x>y then y:=x+y
else y:=y-x;
writeln ('÷èñëî x',x);
writeln ('÷èñëî y',y);
end.