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.