Определить является ли четырехугольник с задаными сторонами прямоугольником
If(a = c and b = d) then writeln('yes') else writeln('no'); где a b c d - стороны четырехугольника