вывести вторую цифру терёхзначного числа

разделить число на 10, полученную целую часть от деления еще раз разделить на 10 и взять остаток от деленияна Pascal это выглядит так:x:= 156;y:=((x div 10) mod 10)результат: у=5