This is an image I want to draw.

And this is what I got so far.

\documentclass{article}
\usepackage{tkz-euclide}
\usetkzobj{all}
\begin{document}
\begin{tikzpicture}
\tkzDefPoint(0,0){A}
\tkzDefPoint(2,0){B}
\tkzDefPoint(2,5){C}
\tkzDefPoint(0,4){D}
\tkzDrawPolygon[fill=gray!10](A,B,C,D)
\tkzLabelPoints(A)[anchor=east]{$A$}
\tkzLabelPoints(B)[anchor=west]{$B$}
\tkzLabelPoints(C)[anchor=south]{$C$}
\tkzLabelPoints(D)[anchor=east]{$D$}
\tkzMarkRightAngle(D,A,B)
\tkzLabelSegment[above](A,C){$1$\,cm}
\tkzLabelSegment[left=4pt](B,A){$x$\,cm}
\tkzLabelSegment[right](C,B){$y$\,cm}
\end{tikzpicture}
\end{document}
What am I doing wrong?
I appreciate your help.
