program paskal_dlya_yebkov; var x,y:real; begin writeln('vvedite x'); readln(x); writeln('vvedite y'); readln(y); if x=y then begin writeln('X ravno Y'); writeln(x:20:2); writeln(y:20:2); end else if x>y then begin writeln('X > Y'); x:=x/2; y:=y/2; writeln(x:20:2); writeln(y:20:2); end else if x