Определить является ли четырехугольник с задаными сторонами прямоугольником

If(a = c and b = d) then writeln('yes')
else writeln('no');

где a b c d - стороны четырехугольника