Потому что диван,кровать,шкаф и парта это мебель!
Var
x1,y1,x2,y2:byte;
Begin
Read(x1,y1,x2,y2);
if (x1-x2 = 0)xor(y1-y2 = 0) then Write('YES')
else Write('NO')
End.
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)</span>
begin
var (a,b):=(Random(0,10),Random(0,10));
if a=b
then Println(a,'=',b)
else Println(Random(0,10),Random(0,10));
end.
4)m+3-6m-5-m+1=-6m-1
5)x-y+x-y-2x-y=-3y
6)0.2x-3-x+2-0.4x+1=-1.2x