Var
a, b:integer; //числа типа integer, т.е. целые числа
Begin
write('Введите число a: ');
read(a); //читаем значение а
write('Введите число b: ');
read(b); //читаем значение b
if(a>b) then writeln('>'); //если a>b тогда пишем '>'
if(a if(a=b) then writeln('='); //если a=b тогда пишем '='
end.