// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var c1:=ReadlnChar('Введите первый символ:');
var c2:=ReadlnChar('Введите второй символ:');
Print(c1);
if c1>c2 then Print('>')
else
if c1=c2 then Print('=')
else print('<');<br> Println(c2)
end.
Примеры
Введите первый символ: a
Введите второй символ: b
a < b
Введите первый символ: d
Введите второй символ: d
d = d
Введите первый символ: z
Введите второй символ: m
z > m
Введите первый символ: q
Введите второй символ: Q
q > Q