С клавиатуры вводятся два числа. Составить программу сравнивающую эти числа и в зависимости от результата сравнения выводящую на экран нужный знак.Например: 32. Процедуру WRITE для вывода результата разрешается использовать только один раз.

Var a,b:integer; c:char;
begin
readln (a,b);
If a>b then c:=>;
If a=b then c:==;
If awriteln(a,c,b);
end.