Ввести с клавиатуры 2 числа a и b. Если a = b; вывести на экран «a = b». Если a > b; вывести на экран «a > b». Если a < b; вывести на экран «a < b».

vara,b:integer;beginwriteln('Введите a');readln(a);writeln('Введите b');readln(b);if a>b thenwriteln('a>b')elseif a<b thenwriteln('a<b')elsewriteln('a=b');end.