Зададено двузначное число. Найдите разность между количеством десятков и одинок. Нужно составить программу в PascalABC.
Var n:integer; begin Read(n); Writeln(n div 10 - n mod 10) end.