Question

паскаль
Найти
наименьшую и наибольшую цифру в записи числа А. 

Answer 1

var
  a: integer;

begin
  readln(a);
  a := abs(a);
  writeln(a.ToString().Max(), '  ', a.ToString().Min());
end.