Help me ....................................
// PascalABC.NET 3.2 begin var n:=readInteger; Writeln('десятки ',n div 10,' единицы ',n mod 10) end.