Pascal abc Написать программу, которая бы вводила с клавиатуры два символа и выводила **...

Question

Pascal abc
Написать программу, которая бы вводила с клавиатуры два символа и выводила на экран
тот, код которого больше (использовать операцию сравнения символов)

Answer 1

Var c1,c2:char;
begin;
readln(c1);
readln(c2);
if ord(c1)>ord(c2) then writeln(c1) else writeln(c2);
end.