Question

задано двухзначное число. Найдите разность между количеством десятков и единиц

Answer 1

var
  n:integer;
 
begin
  Read(n);
  Writeln(n div 10 - n mod 10)
end.