program z5;
uses crt;
var a,b,z:integer;
BEGIN
clrscr;
writeln('a b z');
readln(a,b,z);
if (a=b) and (z=90) then writeln('kvadrat');
if (a=b) and (z<90) then writeln('romb');
if (ab) and (z=90) then writeln('pramougolnik');
if (a readln;
END.