Дано целое Число больше 999.Используя одну операцию деления нацело и одно опереацию взятия остатка от деления, найти цифру,соотвевщию
разряду тысяч в записи этого числа
Ребята помогите пожалуйста

Число делить нацело на 1000 и взятие остатка при делении на 10на Pascal так:A:=(N div 1000) mod 10;где N - начальное число. А - получаемое число