Помогите, пожалуйста, решить задачу в ПАСКАЛЕ



Одна из основных операций с числами – их сравнение. Мы подозреваем, что вы в совершенстве владеете этой операцией и можете сравнивать любые числа, в том числе и целые. В данной задаче необходимо сравнить два целых числа.
Входные данные
В двух строчках входного файла INPUT.TXT записаны числа A и B, не превосходящие по абсолютной величине 2×109.
Выходные данные
Запишите в выходной файл OUTPUT.TXT один символ “<”, если A < B, “>”, если A > B и “=”, если A=B.



1. 5 7 (<)
2. -7 -12 (>)
3. 13 13 (=)

vara, b:integer;f,w:text;begin  assign(f,'input.txt');reset(f);  assign(w, 'output.txt');rewrite(w);  Readln(f, a, b);  if (a > b) then Writeln(w, '>');  if (a < b) then Writeln(w, '<');  if (a = b) then Writeln(w, '=');  close(f);close(w);end.Пример:input.txt: 100 99output.txt : >