Дано натуральное число n (n больше 9). найти цифру десятков в нём. например, для n = 4876 ответ- 7, для n- 19 ответ-1

Begin
var n := ReadInteger;
Assert(N > 9);
Writeln('Число десятков равно ', n mod 100 div 10);
end.