Составить программу проверки утверждения: верно ли, что А>B( числовые значения А и В вводятся с клавиатуры)

program gg;

var a:string;

begin

write ('Введите символ');

writeln;

read(a);

if (a>='0') and (a<='9')then write ('number')

else write ('not a number');

end.