program z134;
uses crt;
var a,b:integer;
begin
clrscr;
Writeln('введите a');
readln(a);
Writeln('введите b');
readln(b);
if a>b then Writeln('a>b')
else Writeln ('a<b');
readln(a,b);
end.